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HYBRID  OPTICAL/DIGITAL  ARCHITECTURE 
FOR  DISTORTION  INVARIANT  PATTERN  RECOGNITION 

I .  I NT R ODUCTION 

Machine  intelligence  for  pattern  recognition  has  Long 
been  a  dream  of  both  industrial  and  military  engineers. 
Imagine  a  robot  on  a  flight  line  capable  of  autonomously 
navigating  its  way  between  and  through  various  maintenance 
tasks.  How  about  a  smart  satellite  that  could  not  only  scar, 
the  earth's  surface  for  enemy  movement,  but  could  also  alert 
one  of  potential  aggressive  acts?  Perhaps  we  could  even 
develop  a  tactical  fighter  missile  that  locates  and  dost  roys 
its  target  based  on  the  target's  shape  (as  opposed  to  its 
temperature  like  the  easily  confused  heat  seeking  missile). 

A  pattern  recognition  system  that  works  well  in  a  myriad  ot 
uncontrolled  environmental  conditions  is  the  essential 
missing  component  for  these  and  many  other  intelligent 
systems . 

To  be  effective  for  these  applications,  a  pattern 
recognition  system  must  work  regardless  of  the  target's 
illumination,  position,  scale  and  orientation,  or  its 
partial  obstruction  by  scene  clutter.  It  must  provide 
results  in  near  real  time,  with  a  high  probability  ol  t.arg*  ‘ 
detection  as  well  as  a  low  probability  of  fair.,  alarm. 

Over  the  years,  much  has  been  written  about  the  divers.' 
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field  of  pattern  recognition.  To  date,  this  work  has 
yielded  techniques  thac  solve  onl^  the  simplest  "toy 
problems."  The  majority  of  techniques  showing  any  promise 
employ  sophisticated  computer  algorithms  requiring  large 
computers  and  long  calculation  times.  Unlike  the  many 
pattern  recognition  techniques  employing  complex  computer 
algorithms,  optical  information  processing  does  not  require 
large  scale  computers,  and  can  potentially  give  results  at 
the  speed  of  light. 

1.1  Background 

In  his  classic  text  Introduction  to  Fourier  Optics. 
Joseph  W.  Goodman  discusses  a  number  of  processes  that  are 
the  usual  points  of  reference  for  all  discussion  concerning 
optical  information  processing.  He  discusses  the  Fourier 
transforming  property  of  lenses  [1:33-90],  the  Vander  Lugt 
filter  [1:171-177],  and  the  joint  transform  correlator 
[1:194].  He  also  suggests  that  the  well  known  matched 
filter  correlator  is  extremely  sensitive  to  changes  of  scale 
or  rotation  of  scene  objects  with  respect  to  a  reference 
template  [1:183-184], 

Employing  coordinate  transformations,  David  Casasent 
and  Demetri  Psaltis  of  Carnegie  Mellon  University  discovered 
that  they  could  improve  the  probability  of  detection  of 
rotated  and  scaled  objects.  They  used  a  computer  generated 
hologram  ( CGH )  to  transform  light  intensity  distributions 
from  x-y  coordinates  to  log-polar  coordinates  (logarithm  of 
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the  radial  coordinate) .  Using  these  features  they  were  able 
to  employ  matched  filter  correlation  that  was  booh  rotation 
and  scale  invariant  [2:77-84].  However,  even  though  they 
could  decide  whether  or  not  a  rotated  and  scaled  object  was 
in  a  particular  scene,  they  could  not  locate  it. 

Under  the  direction  of  Major  Steven  Rogers,  Dr.  Matthew 
Kabrisky,  and  Lieutenant  Colonel  James  Mills,  thesis 
students  at  the  Air  Force  Institute  of  Technology  (AFIT) 
have  continued  to  pursue  pattern  recognition  techniques  that 
are  both  scale  and  rotation,  as  well  as  position  invariant 
[3].  Horev  proposed  a  technique  [4]  implemented  as  a 
computer  algorithm  by  Kobel  and  Martin  [5]  that  provided  all 
of  these  features.  Schematically  pictured  in  Figure  1,  this 
technique  first  performed  the  two  dimensional  Fourier 
transform  (FT)  on  the  input  object,  then  performed  the  log- 
polar  coordinate  transformation  (LPCT)  on  the  magnitude  of 
the  Fourier  transform  ( | FT ! 2 )  ,  followed  by  correlation  with 
a  template.  Casasent  and  Psaltis  proposed  an  optical 
implementation  of  these  few  steps,  but  the  Kobel-Martin- 
Horev  (KMH)  algorithm  didn't  stop  there.  Using  the 
correlation  data,  they  found  the  proper  scale  and  rotation 
of  the  target  within  the  scene,  and  rectified  (corrected) 
the  template  to  reflect  these.  This,  coupled  with  some 
additional  processing,  allowed  them  to  locate  the  target. 

Troxel  augmented  the  KMH  algorithm  with  artificial 
neural  network  processing  to  perform  target  recognition  on 
range  imagery  [6].  Using  features  that  described  the  shape 
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Figure  1.  Horev  Algorithm 
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of  autocorrelations  and  crosscorrelations  of  target  objects, 
his  multilayer  perceptron  was  trained  to  classify  various 
targets.  However,  like  Kobel,  Martin  and  Horev's  work,  his 
algorithm  was  far  too  slow  to  be  considered  much  more  than 
an  interesting  result. 

The  need  to  reduce  the  computational  load  on  this 
pattern  recognition  technique  was  paramount  if  it  was  to 
have  any  application.  The  obvious  choice  at  AFIT  was  to 
attempt  an  optical  implementation  of  the  KMH  algorithm.  One 
optical  architecture  was  originally  suggested  by  Miazza  [7]. 
The  greatest  hardware  requirements  for  this  architecture 
were  two  types  of  spatial  light  modulators  (SLMs) ,  a 
magneto-optic  SLM  (MOSLM)  and  a  liquid  crystal  light  valve. 
These  devices  were  still  in  developmental  stages,  so  they 
were  very  expensive,  in  fact,  AFIT  has  yet  to  receive 
adequate  financial  support  to  purchase  the  liquid  crystal 
light  valve.  However,  that  has  not  halted  research  here. 

Using  the  Casasent-Psalt is  technique,  Mayo  implemented 
the  LPCT  of  various  objects.  He  began  his  work  using  a 
Litton  MOSLM  as  an  input  image  device,  but  had  to  return  to 
glass  slides  when  the  device  failed  [8].  This  first  attempt 
set  the  foundation  for  further  developments  by  Childress  and 
Walrond  [9].  Their  work  differed  from  Mayo's  in  that  they 
performed  the  LPCT  of  the  j  FT | 2  of  input  images,  not  just 
the  LPCT  of  the  images  themselves.  Moreover,  they  verified 
that  correlation  in  this  LPCT- | FT | 2  space  could  provide  the 
proper  scale  and  rotation  for  template  rectification. 
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However,  their  research  stopped  short  of  using  this  scale 
and  rotation  information  to  continue  target  identification 
in  the  original  scenes.  Their  work  suggested  the  viability 
of  optical  implementation,  but  they  had  no  continuous 
process  (the  steps  were  implemented  piecemeal,  and  a 
mainframe  computer,  as  well  as  human  judgement,  were 
required  for  intermediate  calculations) ,  so  they  fell  short 
of  a  real  time,  continuous  process. 

The  joint  transform  correlator  (JTC)  suggested  by 
Weaver  and  Goodman  [10],  has  gained  new  interest  in 
professional  publications  recently.  Javidi,  Gregory,  and 
Horner  [11]  have  done  theoretical  and  experimental  research 
with  both  liquid  crystal  televisions  (LCTVs)  and  MOSLMs. 
Interest  has  peaked  because  these  two  devices  can  make 
possible  real  time  implementation  of  a  correlator.  However, 
these  correlators  are  not  scale  and  rotation  invariant. 

1.2  Problem  Definition 

A  large  step  in  optically  implementing  a  KMH  type 
pattern  recognition  scheme  as  a  continuous  process  is  the 
development  of  a  working  optical  correlator.  This 
correlator  could  be  used  to  find  the  proper  scale  and 
rotation  as  suggested  by  the  KMH  algorithm.  It  could  then 
be  used  to  correlate  the  original  scene  (or  perhaps  an 
enhanced  scene)  with  a  rectified  template  to  acquire  the 
target's  location  in  the  scene.  Once  the  target  was 
acquired  the  correlator  could  be  used  as  a  tracker. 
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1.3  Scope  of  Thesis 


The  first  major  goal  of  this  thesis  was  to  develop 
software  for  personal  computer  (PC)  control  of  the  MOSLM  and 
the  two  charge  coupled  device  (CCD)  cameras  connected  to  the 
framegrabber  card.  Since  development  of  techniques 
applicable  to  real  data  was  the  goal,  this  process  also 
included  preparation  of  available  forward  looking  infrared 
(FLIR)  image  data  as  sample  input  images  for  display  on  the 
MOSLM.  These  FLIR  files  were  eight  bit  grey  scale  arrays  of 
240X640  pixels,  so  considerable  effort  needed  to  be  taken  to 
make  them  useable  in  a  JTC  that  employed  a  binary  128X128 
pixel  MOSLM.  The  binarization  of  images  for  use  in  hybrid 
optical  systems  is  a  major  problem  to  be  addressed,  because 
the  techniques  used  for  binarization  can  drastically  affect 
results . 

The  next  goal  was  to  implement  in  hardware  an  optical 
JTC  like  those  suggested  in  the  publications.  Using  FLIR 
imagery,  as  opposed  to  some  sort  of  "toy"  data,  provided  a 
significant  first  step  toward  evaluating  this  technology  for 
practical  applications.  Several  improvements  were  made  upon 
published  designs  of  the  JTC,  and  these  data  were  used  in 
experiment,  as  well  as  simulation,  for  verification. 

The  final  goal  was  to  design  and  test  a  hybrid 
optical/digital  architecture  for  distortion  invariant 
pattern  recognition.  The  system,  pictured  in  Figure  2, 
could  potentially  perform  the  LPCT  process  necessary  for 
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position  scale  and  rotation  invariant  (PSRI)  pattern 
recognition.  As  part  of  this  third  goal,  a  sample  of  the 
CGH  created  by  Mayo  [8]  and  Hill  [12]  was  compared  with  one 
temporarily  on  loan  from  Perkin-Elmer .  Correlation  of  test 
objects  using  the  LPCT-|ft|2  features  was  also  performed. 

1 . 4  Approach 

Optical  data  flow  through  this  architecture  followed 
one  of  two  paths  (see  Figure  2) .  First  binarized  images 
were  displayed  on  the  MOSLM  by  the  PC.  Next,  the  | FT | 2  of 
the  image  was  detected  at  CCD1,  and  the  LPCT  of  the  image 
was  detected  at  CCD2 .  By  throwing  a  manual  switch,  the 
operator  could  decide  which  CCD  camera  would  be  connected  to 
the  framegrabber  in  the  PC.  (This  manual  switch  could 
easily  be  replaced  with  a  PC  controllable  one  in  the 
future.)  Once  the  PC  had  captured  the  data,  it  could 
perform  calculations  on  it,  and  where  appropriate,  display 
binarized  versions  of  these  captured  frames  on  the  MOSLM. 

To  acquire  the  LPCT-|ft|2  features,  a  binarized  image 
was  displayed  on  the  MOSLM.  CCD1  detected  the  | FT | 2  of  the 
image  and  the  PC  displayed  its  binary  representation  on  the 
MOSLM.  CCD2  detected  the  LPCT  of  this  binarized  | FT  1 2  and 
the  PC  saved  the  frame  for  later  use. 

To  perform  correlation  in  this  architecture  the  PC 
displayed  a  frame  on  the  MOSLM.  This  frame  had  a  template 
(t(x,y))  centered  on  the  bottom  half  and  a  scene  (s(x,y)) 
centered  on  the  top  half.  CCD1  detected  the  joint  power 
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Figure  2.  Hybrid  Optical/Digital  Architecture 
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spectrum,  or  joint  transform,  of  t  and  s.  The  PC  binarized 
this  joint  transform  and  displayed  it  on  the  MOSLM .  CCDl 
then  detected  what  will  be  called  the  correlation  plane.  On 
axis  was  the  autocorrelation  of  t  (Ct)  plus  the 
autocorrelation  of  s  (Cs) .  Above  and  below  these 
autocorrelations  was  the  crosscorrelation  of  t  and  s  (Ct). 
The  PC  located  the  correlation  peaks  in  the 
crosscorrelations,  interpreted  the  results  as  candidate 
target  locations,  (or  perhaps  scales  and  in-plane 
rotations),  and  reported  results. 

Using  the  LPCT- | FT | 2  features  of  a  scene  and  a 
template,  correlation  was  to  provide  the  proper  scale  and 
in-plane  rotation  of  the  target  in  the  scene.  This  was  true 
since  in  this  feature  space  shifts  of  the  correlation  peak 
along  one  axis  relate  to  scale  changes,  while  shifts  along 
the  other  axis  relate  to  in-plane  rotations.  Using  this 
information,  the  template  could  be  rectified  to  reflect 
these,  and  correlation  in  the  original  scene  space  would 
yield  the  target's  location. 

1.5  Overview  of  Thesis 

This  thesis  is  divided  into  six  chapters  and  seven 
appendices.  The  chapters  are  used  to  discuss  general 
concepts  and  results,  while  the  appendices  are  reserved  for 
details  on  equipment  as  well  as  computer  code. 

Chapter  I,  this  chapter,  serves  as  an  introduction  to 
the  thesis  topic.  Chapter  II  discusses  basic  concepts  such 


as  correlation,  joint  transform  and  coordinate 
transformation,  and  describes  in  greater  detail,  the  hybrid 
architecture.  Chapter  III  describes  the  JTC,  discusses  some 
important  engineering  decisions  associated  with  it,  and 
presents  experimental  results.  Chapter  IV  describes  the 
LPCT  and  presents  experimental  results  for  both  the  Perkin- 
Elmer  sample  CGH  as  well  as  the  Mayo-Hill  CGH .  Chapter  V 
describes  a  few  details  concerning  the  PSRI  architecture  and 
presents  experimental  results  of  the  correlation  of  the 
LPCT- | FT | 2  features.  Finally,  chapter  VI  summarizes  the 
results,  presents  conclusions,  and  provides  recommendations 
for  potential  future  research  effort. 

Appendices  A  through  C  provide  detailed  information 
concerning  the  MOSLM,  framegrabber  system,  and  sample  FLIR 
data  respectively.  Appendices  D  through  F  discuss  the  use 
of  tools  available  on  various  systems  that  may  assist  in 
documentation.  Finally,  Appendix  G  describes  software  used 
for  equipment  control  for  the  continuous  process  that  makes 
up  the  hybrid  system  architecture. 
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II . 


BASIC  CONCEPTS 


This  chapter  discusses  several  concepts  central  to  this 
thesis.  First,  theoretical  developments  of  correlation  and 
the  joint  transform  correlator  will  be  presented.  Next,  the 
concept  of  a  scale  and  rotation  invariant  feature  space  will 
be  presented,  followed  by  discussion  of  the  KMH  algorithm. 
Finally,  the  hybrid  optical/digital  implementation  of  a 
variation  on  the  KMH  algorithm  will  be  described. 

2.1  Correlation 

Correlation  is  a  mathematical  process  that  provides  an 
estimate  of  the  similarity  between  two  things.  The  process 
is  simply  described  in  layman's  terms  for  target 
recognition.  A  picture  of  what  the  target  looks  like  (known 
as  a  template)  is  compared  to  all  locations  on  a  picture  of 
a  much  larger  scene  (imagine  a  transparent  template  being 
passed  over  the  scene  picture) .  At  each  location  a  number 
(the  correlation)  is  returned  that  represents  the  similarity 
between  the  template  and  the  scene  at  that  location.  If  the 
scene  is  appropriately  normalized,  then  at  the  locations 
where  the  scene  and  template  agree  most,  the  correlation 
will  be  the  largest  (this  will  be  referred  to  as  the 
correlation  peak),  and,  if  the  correlation  peak  is  greater 
than  some  threshold,  that  location  could  be  identified  as  a 
target.  The  shape  of  the  correlation  peak  has  also  been 
used  for  locating  targets  and  is  a  possible  alternative  or 
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supplement  to  this  threshold  detection  technique  [ 6 i . 

Distinction  between  autocorrelation,  crosscorrelation, 
and  just  plain  correlation  is  necessary  at  this  point. 
Autocorrelation  refers  to  the  correlation  of  an  object  with 
itself.  Crosscorrelation  refers  to  correlation  of  one 
object  with  another.  In  most  articles,  use  of  the  word 
correlation  without  a  prefix  will  mean  crosscorrel at i on . 
Another  point  of  confusion  to  look  out  for  is  the  use  of  th 
word  autocorrelation  for  a  crosscorrelation  that  correctly 
identifies  a  target.  These  will  be  avoided  from  here  on  in 
this  thesis. 

Goodman  provides  this  mathematical  description  [1:17=1] 
Cst(x,y)  =  s (a , B)  *t(a,B)  (  1) 


co 

s(a,6)  t*(a-x,B-y)  d.r! 

- cc 


( :: ) 


(■>) 


where  a  and  B  are  dummy  variables,  s  and  t  are  scene  and 
template  input  image  intensity  distributions,  and  S  and  T 
their  respective  Fourier  transforms.  The  symbol  3'' 
represents  the  inverse  Fourier  transform,  *  stands  for 
correlation,  and  means  complex  conjugate.  The  variables, 
f  and  f  ar*3  used  to  represent  the  spatial  frequencies 
associated  with  the  x  and  y  cardinal  directions.  Note  that 
Cst  represents  the  crosscorrelation  of  s  and  t.  By 
replacing  t  with  s,  the  above  equations  would  represent  the 
autocorrelation  of  the  scene.  However,  as  was  mentioned  in 
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chapter  1,  the  notation  will  be  C  ,  not  Csv .  Similarly,  C. 
will  denote  the  autocorrelation  of  the  template. 

2.2  Joint  Transform  Correlation  Theory 

One  way  of  acquiring  the  C  of  real  valued  inputs  was 
suggested  by  Weaver  and  Goodman  [10].  Figure  i  picture:',  a 
scene  and  a  template,  both  displayed  in  a  single  input 
plane.  The  scene  is  centered  in  the  top  half  of  the  plane 
at  a  location  (0,Y/2)  and  the  template  at  (0,-Y/2).  The 
converging  lens,  placed  exactly  one  focal  length  away  from 
the  input  and  output  planes  provides  a  Fourier 
transformation  on  the  input.  That  is  to  cay  that  it  the 
input  plane  is  a  two  dimensional  transmission  function,  and 
it  is  illuminated  with  a  uniform  amplitude  plane  wave,  then 
light  appearing  at  the  output  plane  would  have  i 
distribution  equal  to  the  Fourier  transform  of  the  input 
plane's  transmissivity  both  in  phase  and  amplitude.  The 
spatial  frequencies  ft  and  f  can  be  related  to  physical 
dimensions  by: 

/,  =  x/\f  and  fy  =  y/xf  ( l) 

where  \  is  the  wavelength  of  light  and  f  is  the  local 
length.  Furthermore,  shifts  of  an  object  in  the  input  plan, 
results  only  in  phase  variations  in  the  Fourier  transtorm  i 
the  output  plane.  These  are  well  known  facts,  and  further 
development  can  be  found  in  any  book  containing  chapters  on 
Fourier  optics.  Therefore,  no  further  development  will  be 
presented  on  this  concept  here. 
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Figure  3.  Goodman's  Optical  Arrangement 


Given  that  this  optical  arrangement  can  I 
transform  the  input,  and  that  shifts  in  the  ir 
phase  differences  in  the  output,  Goodman's  di: 
be  developed.  The  input  plane  can  be  represor 
equation : 

i(x,y)  -  s(x,  y-Y/2;  +  t(x,  y+Y/2) 

whose  Fourier  transform  is: 

-  j  -n  f  Y  *  i  ^  ‘ 

I  (ft'fy)  =  S(fK'fy)  e  +  T  e 

However,  available  detectors  only  measure  the 

light  incident  upon  them,  not  the  amplitude  nr 

this  intensity  distribution  can  be  represented 

—  j  7T  /r>  Y  • 

\Uf\.,fr.)  -  S  (f,,fy)  e  V  +  T  (f.,  fy)  . 

••  I  S(fx'fy)  i?  4  \T(fA,fy)  ' 

+  S(fK,fy)T(fx,fy)  c 

*  i •' " f 


If  this  intensity  distribution  is  now  placed  in  the  input 
plane  of  this  optical  arrangement,  the  resultant  output 
plane  will  be: 

0(x,y)  =  Cs(x,y)+Ct(x,y)+Cst(x,y-Y)+Cts(x,y+Y)  (8) 

Figure  4  depicts  what  this  output  plane  will  look  like  in 
general.  Notice  that  the  two  crosscorrelations  appear  above 
and  below  the  central  autocorrelations  and  they  are  offset 
from  the  origin  by  the  distance  Y.  It  can  be  shown  that  to 
avoid  overlap  of  the  auto-  and  crosscorrelations,  the  input 
scene  and  template  must  be  separated  by  at  least  the  sum  of 
3/2  of  the  larger 's  vertical  extent  plus  1/2  of  the 
smaller 's  vertical  extent.  This  issue  is  important  and  is 
discussed  in  greater  detail  in  Chapter  III. 


2.3  Scale  and  Rotation  Invariance 


One  weakness  of  crosscorrelation  as  a  tool  for  locating 
targets  in  a  scene  is  that  frequently  the  target  may  not 
have  the  same  scale  or  orientation  as  the  tempi  ate  being 
used.  How  much  impact  this  might  have  on  crosscorrelation's 
ability  to  locate  targets  will  vary  greatly  with  the 
application.  Clearly,  a  circle's  shape  doesn't  vary  with 
rotation.  However,  crosscorrelations  of  irregular  shapes, 
especially  edge  enhanced  ones,  will  suffer  dramatically  when 
the  template  is  improperly  scaled  or  rotated.  In  general, 
more  than  a  few  degrees  of  rotation,  or  a  few  percent  of 
scale  change  will  typically  make  a  target  unrecognizable  by 
correlation  techniques.  One  solution  to  this  problem  would 
be  to  crosscorrelate  scenes  with  templates  of  all  possible 
scales  and  orientations.  This  would  work,  but  the  large 
amount  of  processing  necessary  would  make  such  a  system  too 
slow  or  large  to  be  useful. 

Cassasent  and  Psaltis  proposed  a  feature  space  that 
would  provide  correlations  that  were  scale  and  in-plane 
rotation  invariant  [2].  They  suggested  that  the  magnitude 
of  the  Fourier  Transform  be  mapped  in  rectangular 
coordinates  with  flog(r)  along  the  vertical  axis,  and  f\  along 
the  horizontal  axis.  In  this  feature  space, 
crosscorrelation  would  turn  changes  in  scale  to  vertical 
shifts  and  changes  in-plane  rotation  to  horizontal  shifts  of 
the  correlation  peak.  The  problem  was  that  although  a 
strong  correlation  peak  with  these  features  would  indicate 
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the  presence  of  a  target,  it  would  not  locate  it  within  the 
scene  (Not  to  mention  that  out-of-plane  rotations  would 
still  require  multiple  templates) . 

2.4  KMH  Algorithm 

To  tackle  the  in-plane  rotation  problem,  Horev  used 
these  LPCT- | FT | 2  features  to  determine  the  scale  and 
rotation  of  the  target  within  the  scene  [4].  Using  this 
information  the  template  was  rectified  to  reflect  the  proper 
scale  and  rotation.  The  amplitude  of  this  new  template's 
Fourier  spectrum  was  combined  with  the  phase  of  the  scene, 
then  inverse  Fourier  transformed.  The  result  was  a  scene 
with  an  enhanced  target.  Kobel  and  Martin  crosscorrelated 
this  new  scene  with  the  rectified  template  to  acquire  the 
target's  location  [5]. 

2.5  Hybrid  Qptical/Diqital  Architecture 

As  was  mentioned  in  Chapter  I,  attempts  at  implementing 
this  algorithm  in  optics  has  occupied  a  number  of  people 
here  at  AFIT  over  the  last  few  years,  but  so  far,  only 
limited  results  have  been  achieved.  A  hybrid 

optical/digital  architecture  was  implemented  for  this  thesis 
effort  that  employed  the  JTC  discussed  in  section  2.2.  It 
also  employed  a  CGH  to  perform  the  necessary  coordinate 
transformation.  Two  significant  differences  between  this 
architecture  and  the  KMH  algorithm  are  that  the  input  device 
is  binary,  and  no  capability  for  phase  reinsertion  is 
provided . 
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A  schematic  diagram  of  the  architecture  was  presented 
as  Figure  2  in  Chapter  I.  Figure  5,  on  the  following  page 
is  a  flowchart  of  the  processing  performed  by  this 
architecture.  Suggestions  for  improvement  of  this 
architecture  are  offered  in  Chapter  VI. 

2.6  Summary 

This  chapter  discussed  several  concepts  key  to  the 
understanding  of  this  thesis.  Correlation  was  defined  and 
the  principles  of  the  JTC  were  presented.  The  notion  of  a 
scale  and  rotation  invariant  feature  space  and  the  KMH 
algorithm  were  also  presented.  Finally,  the  hybrid 
optical/digital  implementation  of  a  variation  of  the  KMH 
algorithm  was  described. 

Chapters  III,  IV,  and  V,  discussing  the  JTC,  LPCT,  and 
the  hybrid  system  architecture  respectively,  should  now  be 
easier  to  comprehend. 
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Figure  5.  Hybrid  optical/digital  architecture  flow  diagram. 
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III.  JOINT  TRANSFORM  CORRELATOR  jJTC) 

This  chapter  presents  information  about  the  JTC. 

First,  a  summary  of  published  material  on  the  subject  will 
be  presented.  Next,  engineering  issues  relating  to  the 
implementation  of  the  optical  JTC  will  be  presented. 
Finally,  theoretical  and  experimental  results  using  FLIR 
data  will  be  presented.  The  design  and  implementation  of  a 
JTC  is  the  most  significant  goal  of  this  thesis  effort. 


3.1  Current  Knowledge 

In  1966,  Joseph  W.  Goodman  and  C.  S.  Weaver  published 
the  article  "A  Technigue  for  Optically  Convolving  Two 
Functions"  in  Applied  Optics  [10]  (this  work  was  sponsored 
by  the  USAF  Avionics  Laboratory) .  From  their  work  using 
film,  the  experimental  JTCs  employing  MOSLMs,  LCTVs  and 
deformable  mirrors  [13]  have  evolved. 

More  recently,  a  number  of  articles  have  been  written 
by  various  authors  on  the  JTC.  The  attraction  of  this 
technique  of  correlation  is  that:  1)  correlation  at 
television  frame  rates  (30  frames/second)  is  possible;  and 
that  2)  alignment  is  not  nearly  as  critical  as  the  Vander 
Lugt  filtering  technique  [14]. 

In  an  article  by  Bahrain  Javidi  (who  has  received 
support  from  the  Rome  Air  Development  Center  detachment 
operating  at  Hanscomb  AFB,  MA,  Dr.  Joseph  Horner),  the 
performance  of  various  techniques  of  correlation  are 
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compared  [15].  He  concludes  that  a  binary  JTC  (the  Fourier 
plane  intensity  is  binarized  based  upon  a  median  value 
threshold)  outperforms  the  Vander  Lugt  matched  filter 
correlator,  the  binary  phase  only  matched  filter  correlator, 
and  the  grey  scale  (or  classical)  JTC. 

The  intuitive  reasoning  here  might  be  that  the 
binarized  fringe  pattern  would  be  closer  to  a  pure 
sinusoidal  pattern  (actually  it  is  more  like  a  square  wave) , 
which  would  result  in  sharper  peaks  (more  like  an  ideal 
delta  function)  in  the  correlation  plane  than  that  of  the 
classical  JTC.  Vander  Lugt  matched  filtering  should  yield 
results  similar  to  the  classical  JTC,  so  the  improvement 
there  is  plausible.  The  reason  for  the  improvement  over  the 
binary  phase  only  matched  filter  technique  was  not  obvious, 
but  was  not  investigated  during  this  thesis  effort. 

Also  notable  amongst  the  researchers  is  Don  A.  Gregory 
(with  U.  S.  Army  Missle  Command,  Redstone  Arsenal,  Alabama), 
who  has  performed  research  using  LCTVs  and  sponsored  other 
work  performed  by  Francis  T.  S.  Yu  employing  MOSLMs.  They 
co-authored  an  article  "Illumination  dependence  of  the  joint 
transform  correlation"  that  appeared  in  Applied  Optics  [16]. 
In  this  article,  the  problem  of  having  a  template  that  is  of 
a  different  intensity  than  a  target  within  the  scene  is 
presented.  This  problem  has  always  received  much  attention 
here  at  AFIT,  and  the  AFIT  solution  is  to  locally  energy 
normalize  the  scene  before  trying  to  do  any  further 
processing  [ 17 ] . 
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In  another  article  by  Yu  and  Gregory,  the  ill  effects 
of  fringe  binarization  are  addressed  [18].  The  assumption 
in  this  article  was  that  fringes  were  binarized  based  upon 
some  fixed  threshold  value  like  Javidi's  work.  However, 
that  was  not  the  case  for  the  technique  used  in  this  thesis 
(see  Figure  6) . 

Binarization  of  the  fringes  was  performed  by 
subtracting  the  intensity  detected  in  the  Fourier  plane  from 
displaying  just  the  scene  (  | S  | 2 )  from  that  detected  from 
displaying  both  the  scene  and  the  template  (|s  +  t|2  or  the 
joint  transform) .  This  difference  was  then  compared  to  a 
threshold.  If  it  was  greater  than  the  threshold,  then  that 
pixel  would  receive  a  one,  if  less,  a  zero. 

This  technique  yielded  three  benefits:  1)  it  eliminated 
Cs  from  the  correlation  plane  which  allowed  the  scene  and 
template  to  be  closer  together  (refer  to  the  mathematical 
development  in  section  2.2  if  this  is  not  clear);  2)  it 
improved  the  quality  of  the  fringes  displayed  on  the  MOSLM, 
as  will  be  evidenced  later  in  this  chapter,  and  therefore 
increased  the  size  of  the  crosscorrelation  peaks;  and  3)  it 
eliminated  many  of  the  false  alarms  and  missed  detections 
that  Yu  and  Gregory  identified  for  their  binarization 
technique . 

3.2  Engineering  Issues 

This  section  presents  information  relating  to 
engineering  decisions  made  in  implementing  the  JTC  with  real 
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Figure  6.  Joint  Transform  Correlator  Flow  Diagram 
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FLIR  data.  It  is  divided  in  six  subsections:  1)  Detection 
Limitations;  2)  MOSLM  Limitations;  3)  Input  Data; 

4)  Fringe  Binarization ;  5)  Spatial  Frequency  Components;  and 
6)  Correlation  Plane  Interpretation. 

3.2.1  Detection  Limitations.  In  Goodman's  original 
setup  using  film,  he  was  concerned  about  the  ability  of  the 
film  to  maintain  its  square  law  operation  over  a  broad 
dynamic  range  of  intensities.  This  is  also  a  problem  for 
CCD  cameras.  In  fact,  even  more  significant  is  a  phenomena 
known  as  "blooming"  that  was  discussed  by  Mayo  [8:37],  and 
reitterated  by  Childress  and  Walrond  [9:23].  When  a  region 
of  the  detector  array  is  very  brightly  illuminated,  pixels 
along  the  horizontal  axis  of  the  array  will  also  be  excited 
into  saturation.  For  these  reasons  the  selection  of  neutral 
density  filters  to  be  placed  in  front  of  the  camera  was 
critical.  The  decision  was  complicated  further  by  the  fact 
that  the  same  camera  was  used  to  detect  both  the  Fourier 
plane  and  the  correlation  plane,  which  typically  had 
different  energy  distributions.  A  trial  and  error  technique 
was  employed  for  filter  selection. 

Several  other  sources  of  error  occured  in  the  detection 
process.  Typically,  detector  arrays  are  made  up  of  discrete 
pixel  elements  (the  SONY  model  XC-38  camera  used  in  this 
experiment  was  a  384(H)  X  491 (V)  array).  Response  of  the 
individual  pixel  elements  is  not  identical,  therefore  the 
first  source  of  error  is  introduced.  Since  the  camera's 
output  was  NTSC  video,  an  analog  signal,  some  error  must  be 
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occuring  in  the  process.  The  AT&T  TARGA  framegrabber 
digitized  pixels  into  eight  bit  grey  scale  creating  a 
guantization  error.  Its  array  was  only  400  rows  X  512 
columns  (400X512),  which  represented  a  region  on  the  display 
monitor  slightly  smaller  than  the  entire  monitor  in  both 
dimensions.  Obviously,  sampling  errors  are  occuring 
throughout  the  detection  process.  Noise  too  is  being 
introduced  at  each  step  along  the  way. 

Childress  and  Walrond  purchased  a  charge  injection 
device  (CID)  camera  and  framegrabber  system  that  had  pixel 
elements  in  the  framegrabber  matched  with  those  in  the 
detector  array.  This  ^PTRICON  system  would  clearly 
eliminate  some  of  the  sampling  errors,  and  CID  cameras  do 
not  suffer  from  blooming  either.  The  nonuniformity  of 
response  would  still  be  a  problem;  in  fact,  the  provided 
software  includes  a  bad  pixel  file  for  the  camera  that 
accounts  for  some  of  this.  Unfortunately,  this  expensive 
system  was  inoperative  at  the  start  of  the  thesis  effort, 
and  was  committed  to  another  thesis  while  repairs  were  being 
made.  Should  it  become  available  for  a  follow  on,  it  should 
be  noted  that  software  control  of  the  framegrabber  is  not 
possible  without  the  purchase  of  additional  custom  software 
from  the  manufacturer. 

Additional  information  on  the  CCD  camera  and  the  TARGA 
framegrabber  system  is  available  in  Appendix  B. 

3.2.2  MOSLM  Limitations.  For  those  uninitiated  to 
MOSLM  operation,  review  of  Appendix  A  is  advised  before 
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reading  this  section. 

Perhaps  the  biggest  limitation  in  the  operation  of  the 
MOSLM  is  its  binary  operation.  Of  course,  Javidi  does  not 
see  this  as  a  limitation,  since  his  work  suggests  that 
binary  operation  in  the  Fourier  plane  is  superior.  However, 
a  grey  scale  input  image  device,  like  a  LCTV,  might  be  more 
versatile.  The  great  advantage  claimed  by  MOSLMs  is  that 
their  contrast  ratio  (the  difference  between  an  on  and  an 
off  pixel)  is  as  high  as  30  dB.  The  much  cheaper  LCTVs 
(about  $100  apiece)  are  steadily  improving,  but  are  not  as 
good.  Another  student  a4-  AFIT,  Kenneth  Hughes,  reported  a 
maximum  of  11  dB  for  the  LCTVs  used  during  his  thesis 
[19: 41] . 

The  MOSLM  used  for  this  thesis  had  only  128X128  pixels 
which  was  also  a  limitation.  Semetex,  the  manufacturer, 
reports  devices  as  large  as  1024X1024  pixels.  The  defects 
in  the  128X128  pixel  devices  available  at  AFIT  (that  sell 
for  more  than  $10,000  apiece),  suggest  waiting  for 
technological  improvements. 

The  device  used  in  this  thesis  had  two  full  adjacent 
rows  near  the  center  that  were  inoperative.  It  also  had  a 
pair  of  rows  that  responded  to  writes  to  the  other.  Several 
individual  pixels  would  be  written  to  when  not  addressed, 
while  others  would  not  respond  to  writes.  Figure  7 
demonstrates  the  effects  of  these  defects  on  a  test  pattern 
used  in  the  LPCT  experiments  of  chapter  IV. 

Two  128X128  devices  arrived  at  AFIT  in  the  fall  of 
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Figure  7.  Test  pattern:  a)  as  intended;  b)  as  displayed  on 
defective  MOSLM . 

1988.  They  were  factory  aligned  to  write  to  one  ^ixel  at  a 
time  instead  of  the  optimal  eight  pixels  at  a  time.  The 
effect  here  is  that  the  devices  could  only  operate  at  less 
than  the  maximum  300  frames/second  rate.  Attempts  at 
alignment  of  these  devices  for  eight  pixel  operation  failed, 
so  the  maximum  obtainable,  two  pixel  operation  was  used. 

Shortly  after  the  realignment,  one  of  the  devices  began 
to  demonstrate  eratic  behavior  and  is  now  unusable. 
Fortunately  upon  delivery  of  the  MOSLMs,  the  manufacturer 
had  acknowledged  substandard  performance  in  that  array. 

They  delivered  a  replacement  array  in  the  summer  ot  1989  and 
work  has  begun  on  replacing  the  defective  array.  A 
valuable,  but  fortunately  not  costly,  lesson  has  been 
learned  here.  To  increase  the  number  of  pixels  that  can  be 
written  at  a  time,  it  is  necessary  to  increase  the  current 
to  the  device.  As  is  the  case  with  most  nonlinear  optic 
materials,  this  risks  destruction  of  the  device.  Although 
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it  is  not  clear  whether  or  not  that  occured,  one  should 
exercise  caution,  and  wait  for  the  experts  at  Son-  t •  ■>:  m 
improve  their  technology  before  being  concerne  1  v;  i  *  1.  s:  <  c  i . 
After  all,  these  are  developmental  devices.  inci  h-rtally, 
replacement  arrays  are  currently  running  about  $2;X'". 

3.2.3  Input  Data.  The  FLIR  data  available  was 
provided  by  the  US  Army  and  contained  ground  vehicles  in 
open  fields.  This  data  may  be  useful  for  testing  scale 
invariance  in  the  future,  but  will  not  provide  a  realistic 
rotation  testing  capability.  Future  developments  right 
include  synthetic  aperture  radar  (SAR)  data,  or  laser  range 
data,  amongst  others,  as  candidate  applications. 

Several  frames  containing  the  same  targets  at  the  same 
range  were  available.  These  frames  were  taken  at  i  i 1  to rent 
times  of  the  day,  and  the  targets  do  not  occupy  tin  sire 
pixels  in  each  frame. 

The  infrared  images,  in  their  original  form,  were 
240X640  pixels,  each  represented  using  an  eight  bit  grey 
scale.  However,  close  inspection  of  the  imagery  revealed 
that  every  other  line  was  lighter  than  the  one  adjacent  to 
it.  To  remedy  this,  the  imagery  was  reduced  by  ;v:o  in  both 
dimensions.  This  was  accomplished  by  averaging  a  2X2  pixel 
area  into  1  pixel;  the  resultant  image  would  be  120X320 
pixels.  In  fact,  the  software  written  to  perform  this 
conversion  creates  a  71X320  pixel  file  by  eliminating  son o 
rows  above  and  below  the  targets.  Figure  8  pictures  one  si 
these  71X320  grey  scale  images  (8a),  as  well  as  various 
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binary  images  that  should  clarify  the  rest  of  this  section. 


Figure  8.  FLIR  imagery:  a)  71x320  image;  b)  a  binarized  on 
scene  average  threshold;  c)  a  binarized  on  local  3X3  average 
threshold;  d)  c  "ANDED"  with  b;  e)  a  binarized  on  1.5  times 
scene  average  "ANDED"  with  c;  f)  demonstration  of  subscene 
overlap . 

Next,  the  images  were  binarized  so  that  they  could  be 
displayed  on  the  MOSLM.  The  scene  average  pixel  value  was 
used  as  a  threshold  for  binarization  (8b).  As  a  localized 
adaptive  energy  normalization  technigue,  a  local  3X3  pixel 
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area's  average  was  also  used  to  threshold  (8c).  Figure  8d 
was  created  by  performing  a  pixel  by  pixel  "AND"  operation 
of  these  two  binary  images.  The  resultant  scene  highlighted 
pixels  that  were  both  brighter  than  their  surrounding  area, 
as  well  as  brighter  than  the  average  of  the  entire  scene. 
Typically,  targets  are  much  hotter  than  their  surrounding 
background,  so  using  a  value  slightly  larger  than  the  scene 
average  in  8b  would  further  reduce  scene  noise,  without 
deleting  many  target  pixels,  improving  signal  to  noise  ratio 
(8d  becomes  8e) .  Although  software  allowed  for  variations 
of  this  scene  threshold  (say  to  1.5  times  the  scene 
average) ,  the  experimental  results  presented  later  in  this 
chapter  will  use  the  noisier,  scene  average  thresholded 
scenes  (8d  instead  of  8e) .  This  is  to  demonstrate  the 
correlator's  robust  performance  even  under  less  than  ideal 
conditions.  The  less  noisy  scenes  give  even  higher 
correlation  peaks. 

The  software,  located  in  Appendix  C,  creates  four 
45X128  pixel  scene  files  for  use  in  the  JTC.  This  allows 
for  a  64  pixel  overlap  between  files,  which  ensures  that  at 
least  one  of  the  four  partial  scenes  will  contain  the  entire 
target  (8f).  The  reason  for  the  restriction  of  45  pixels 
vertically  is  explained  in  section  3.2.4. 

Templates  were  created  by  hand  segmenting  binarized 
scenes  with  assistance  from  some  software  that  restricted 
them  to  an  area  of  29X65  pixels.  Experimental  results 
include  templates  from  one  scene  correlated  with  either  the 
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same  scene,  or  a  different  scene. 

3.2.4  Fringe  Binarization .  Redisplay  of  the  intensity 
distribution  detected  in  the  Fourier  plane  onto  the  input 
device  must  take  into  account  several  issues.  The  ideal 
correlation  peak  will  be  a  delta  function  (a  double  delta  if 
both  crosscorrelation  regions  are  considered) ,  which  means 
that  the  redisplayed  Fourier  plane  would  ideally  be  a 
sinusoid.  Unfortunately,  real  targets  in  real  scenes  will 
not  provide  perfect  sinusoidal  interference  fringes  in  the 
Fourier  plane  (This  isn't  Young's  double  pinhole  experiment) 
and  binarization  will  distort  a  sinusoid  to  a  square  wave  at 
best.  Furthermore,  the  effect  of  redisplaying  the  fringes 
on  a  pixelized  device  like  the  MOSLM  will  create  multiple 
orders  of  the  correlation  plane.  These  multiple  orders  may 
overlap  if  intelligent  display  of  the  input  images  is  not 
exercised.  By  restricting  the  scene  to  just  45  rows,  the 
maximum  separation  of  scene  and  template  was  small  enough  to 
avoid  this  overlap. 

Typically,  binarization  of  the  detected  Fourier  plane 
is  accomplished  using  a  simple  threshold.  Since 
interference  is  not  generally  completely  destructive,  many 
relative  lows  in  the  fringe  pattern  can  be  missed  using  this 
technique.  This  is  particularly  true  of  the  frequency 
components  of  the  greatest  intensity. 

As  was  mentioned  before,  the  techniques  used  during 
this  thesis  (see  Figure  6)  can  provide  improved  results. 
After  the  scene  and  template  are  displayed  together  and  the 
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joint  transform  is  detected  in  the  Fourier  plane,  the  scene 
alone  is  displayed  and  its  Fourier  transform  is  detected. 

The  next  step  is  to  subtract  the  two  and  threshold  the 
difference  for  binarizat ion .  The  effect  is  to  highlight 
pixels  with  constructive  interference  and  reduce  pixels  with 
destructive  interference.  The  simulation  presented  later  in 
this  chapter  demonstrates  this  guite  dramatically.  Two 
techniques  of  thresholding  at  this  point  were  attempted 
during  experimentation.  First,  a  threshold  of  zero  was 
chosen,  then  a  threshold  of  the  average  difference  was 
chosen.  The  latter  proved  to  be  slightly  superior  in 
experimentation . 

Two  additional  benefits  were  gained  from  this 
binarization  technique.  First,  the  effect  of  noise  and 
nonuniformity  of  response  was  reduced  with  the  subtraction. 
Second,  the  |s|2  term  was  eliminated  which  allowed  the  scene 
and  template  to  be  brought  closer  together  in  the  original 
input  frame.  In  fact,  it  was  this  latter  result  that 
originally  motivated  trying  this  technique. 

3.2.5  Spatial  Frequency  Components.  Much  debate  over 
which  spatial  frequencies  contain  the  essence  or  Gestault  of 
an  object  has  occured  at  AFIT  [17].  In  general,  it  is  the 
lower  spatial  frequencies  that  usually  allow  a  target  to  be 
detected  since  they  are  usually  of  greater  amplitude,  and 
the  higher  ones  that  allow  a  target  to  be  classified  since 
they  carry  the  detail  of  an  object. 

To  ensure  good  performance  from  the  JTC,  the  focal 
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length  of  the  Fourier  transforming  lens  (LI  of  Figure  2)  was 
chosen  to  include  approximately  one  full  diffraction  order 
on  the  camera  (CCD1) .  This  resulted  in  the  choice  of  a 
converging  lens  with  a  500  mm  focal  length. 

Since  the  MOSLM  allowed  only  128X128  pixels  to  be 
displayed,  a  256X256  pixel  section  was  detected  and  reduced 
before  binarizing.  The  net  effect  was  that  spatial 
frequencies  only  as  high  as  about  a  three  MOSLM  pixel  period 
(1V2  0N/  l1/ 2  OFF)  were  detected.  The  reduction  from 
256X256  to  128X128  reduced  some  of  the  noise  and 
nonuniformity  of  response  effects,  but  also  reduced  the 
clarity  of  the  more  closely  separated  fringes.  This  reduced 
clarity  had  impact  on  the  maximum  allowable  separation  of 
scene  and  template  in  the  original  input  frame.  Therefore, 
this  was  another  driving  force  that  was  applied  to  the 
ultimate  selection  of  the  45  pixel  high  scene's  location. 

One  digression  is  perhaps  necessary  here.  The  approach 
used  in  this  thesis  was  more  akin  to  a  technician  making  the 
most  of  inadequate  resources,  than  that  of  an  engineer 
pursuing  an  optimal  design.  As  an  example,  the  choice  of 
the  lens  focal  length  was  driven  more  by  available  lenses  on 
the  laboratory  shelf  than  anything  else.  Many  other 
decisions  that  seemed  appropriate  at  the  time  may  prove  to 
be  erroneous  given  proper  modelling.  Likewise,  the  choice 
of  45  pixel  rows  and  the  scene's  location  were  driven  by  the 
bad  lines  in  the  MOSLM  as  well  the  more  technical  issues 
mentioned  above.  There's  nothing  magical  about  45  rows,  it 
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just  worked  well  consistently! 

3.2.6  Correlation  Plane  Interpretation.  Obviously  the 
first  step  in  interpreting  the  correlation  plane  results  is 
to  first  detect  it.  The  question  at  this  point  is  which 
portion  of  the  plane  should  be  observed.  The  final  decision 
was  to  framegrab  a  320X256  pixel  region  and  reduce  it  to 
160x128  pixels.  This  frame  reduction  was  done  with  noise 
reduction  in  mind.  As  was  mentioned  before,  it  may  not 
prove  to  be  the  most  prudent  decision  after  further  analysis 
is  done.  This  160X128  pixel  region  could  be  divided  into 
three  distinct  parts,  a  central  autocorrelation  and  an  upper 
and  lower  crosscorrelat ion  (see  Figure  4  in  Chapter  II). 

The  peak  detection  routine  searched  the  upper  and  lower 
50x128  pixel  regions  for  the  top  ten  values  in  each. 

These  were  rank  ordered  by  their  grey  scale  pixel  value. 

(A  sneak  preview  of  the  figures  of  section  3.4  may  also 
clarify  the  ensuing  discussion.) 

If  two  peaks  on  either  half  were  within  5  pixels  of 
each  other,  they  were  combined  by  eliminating  the  lower 
valued  one  from  the  list,  and  adding  five  to  the  larger 
one's  top  ten  list  value.  This  eliminated  redundant 
accounting  for  the  same  target  location  while  acknowledging 
the  presence  of  a  wide  correlation  peak  due  perhaps  to 
imperfect  focusing. 

Stray  reflections,  noise,  and  nonuniformity  of  response 
could  also  cause  peaks  in  one  crosscorrelation  region  that 
had  no  corresponding  peak  in  the  other.  These  were 
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accounted  for  by  checking  the  two  top  ten  lists  to  ensure 
that  a  candidate  target  location  appeared  in  both  lists. 

With  the  exception  of  the  number  one  value,  if  a  peak 
location  in  one  crosscorrelation  was  not  mirrored  by  one  in 
the  othc  - ,  if  '-Tas  el 'mir.r.tcd  free  the  top  ten  list. 

These  two  processes  did  help  reduce  the  number  of 
candidate  target  locations  identified  by  the  correlator. 

One  issue  not  discussed  yet  is  that  of  relating 
correlation  peak  location  to  that  of  candidate  target 
location.  Since  alignment  might  distort  the  theoretical 
correlation  peak  locations,  the  system  was  calibrated  for 
peak  interpretation.  Two  small  identical  annuli,  whose 
locations  were  known  a  priori,  were  used  as  template  and 
scene  objects  in  the  original  input  frame.  The  location  of 
their  correlation  peaks  acquired  after  running  them  through 
the  JTC  were  stored  and  used  for  calibrating  the  setup.  The 
scene  annulus  was  successively  placed  in  each  of  the  four 
corners  of  the  scene  space  and  correlated  with  the  template 
annulus  placed  at  the  customary  template  center.  Subsequent 
correlations  using  FLIR  images  would  recall  these 
calibration  peak  locations  and  linearly  interpolate  to 
relate  peak  locations  to  candidate  target  locations  in  the 
original  scene. 

The  final  display  output  of  the  JTC  was  the  original 
input  frame  with  an  "X"  at  every  candidate  target  location. 
The  brightness  of  the  "X"  on  the  monitor  was  determined  by 
the  top  ten  list  value  for  that  location.  Original  binary 
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input  frame  pixels  were  displayed  as  fully  bright  (Hex  FF) 
or  fully  dark  (Hex  00) . 

In  addition,  a  scene  that  was  segmented  based  on  the 
template  size  and  the  candidate  target  locations  was  also 
dis^I^-d.  This  segmented  scene  cculd  b'"  ^i,  through  the 
correlator  again  for  better  target  discrimination,  since 
this  segmentation  process  reduced  scene  clutter. 

3.3  Simulation  Results 

The  results  of  two  simulations  will  be  presented  in 
this  section.  The  first  is  a  comparison  of  the  classical 
JTC  with  that  of  a  binary  JTC  using  a  mean  value  threshold, 
and  one  using  the  thresholding  technique  employed  in  this 
thesis.  All  three  use  binarized  FLIR  images  as  inputs. 

The  second  is  a  comparison  of  classical  JTCs  employing  the 
four  combinations  of  binary  and  grey  scale  scenes  and 
templates.  This  simulation  demonstrates  the  importance  of 
energy  normalization. 

The  simulations  were  performed  using  Imaging  Technology 
image  processing  equipment  made  available  by  the 
Aeronautical  Systems  Division  (ASD\ENAML) .  Software  to 
convert  TARGA  file  formats  to  those  of  the  Imaging 
Technology  equipment  and  vice  versa  are  in  Appendix  E. 

The  Imaging  Technology  system  does  not  retain  DC  values 
in  calculating  its  fast  Fourier  transform  ( FFT) ,  and  its 
output  is  always  eight  bit  grey  scale  normalized  to  the 
maximum  value.  This  may  not  suffice  for  some  of  the  more 
rigorous  readers,  but  does  adequately  demonstrate  the  point. 
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Figure  9  is  a  comparison  of  various  JTCs  that  each 
treat  the  joint  transform  plane  differently  Frame  a)  is 
the  original  input  frame  with  the  scene  binarized  like 
Figure  8d  (the  "ANDED"  version) ;  b)  is  its  joint  transform; 
c*na  uh  j  ciUssiodl  JTC  correlatron  plane  ( z.  .  c  •  {  x  T  j  of 

b) .  The  correlation  peak  that  locates  the  target  appears  as 
a  black  dot  above  and  to  the  right,  and  below  and  to  the 
left  of  center.  Frame  d)  is  b  binarized  on  the  mean  value 
of  the  entire  frame;  and  e)  is  the  correlation  plane 
generated  by  this  fringe  binarization  technique.  The  peak 
in  e  is  narrower  than  the  one  in  c,  (usually  an  indicator  of 
correlator  performance,  the  narrower  the  better) .  However, 
since  the  Imaging  Technology  equipment  normalizes  the  output 
to  a  maximum  value,  comparisons  of  absolute  values  will  not 
be  useful  here.  Frame  f)  is  the  Fourier  transform  of  the 
scene  alone;  while  g)  is  b  minus  f  binarized  on  the  sign  of 
the  difference.  Finally,  h)  is  the  correlation  plane 
created  by  g,  which  is  the  technique  used  for  the  later 
experimental  correlations  using  optics.  Notice  the  lack  of 
a  large  central  autocorrelation  in  h) . 

Figure  10  contains  side  views  of  surface  plots  for  the 
three  correlation  planes.  Figures  10a  and  10b  are  the  views 
along  the  vertical  and  horizontal  directions  of  figure  9c 
respectively.  Similarly,  10c  and  lOd  relate  to  9e,  and  lOe 
and  lOf  relate  to  9h.  The  immediately  noticeable  difference 
between  9h  and  9c  or  9e  is  the  lack  of  a  large  central 
autocorrelation  in  9h,  due  to  the  subtraction  of  the  | FT | 2 
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Figure  9.  Simulation  of  JTCs:  a)  input  frame;  b)  joint 
transform;  c)  correlation  plane  from  b;  d)  b  binarized  on 
mean;  e)  correlation  plane  from  d;  f)  Fourier  transform  of 
scene  alone;  g)  Binarized  difference  between  b  &  f;  h) 
correlation  plane  from  g. 

of  the  scene  alone.  A  second,  but  perhaps  less  conclusive 
(or  apparent)  fact  is  that  the  noise  floor  about  the 
correlation  peak  is  lowest  for  9h. 

One  explanation  for  the  improvement  of  9h  over  9e  is  as 
follows.  Figure  11a  shows  a  cross  section  of  a  typical  2D 
Fourier  transform  of  a  scene.  Figure  11b  shows  the  same 
scene  joint  transformed  with  a  template.  Notice  that  when  a 
threshold  line  is  drawn,  some  of  the  fringes  both  in  the 
high  intensity  area  and  the  low  intercity  area  can  be  lost. 
Figure  lib  can  be  thought  of  as  the  interference  fringe 
pattern  superimposed  upon  the  scene's  bias  signal.  Figure 


Figure  10.  Sideview  of  surface  plots  of  correlation  planes 
in  Figure  9:  a)  along  vertical  direction  of  9c  (classical 
JTC) ;  b)  horizontal  direction  of  9c;  c)  &  d)  same  as  a  &  b 
for  9e  (simple  binary  threshold);  e)  &  f)  same  as  a  &  b  for 
9h  (scene  subtracted). 
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11c  shows  what  happens  when  the  bias  is  removed  by 
subtracting  lib  from  11a-  Notice  that  a  threshold  will  now 
capture  all  of  the  fringes. 


Figure  11.  Explanation  of  improved  binarization  technique. 
Cross  sections  of  2D  Fourier  transforms  from  top  to  bottom: 
a)  scene  alone;  b)  scene  and  template  showing  one  possible 
very  bad  simple  threshold;  c)  b  minus  a  showing  improved 
threshold  technique. 

Figure  12  compares  the  effects  of  grey  scale  versus 
binary  inputs  to  a  classical  JTC.  It  is  divided  into  four 
columns  of  three  frames.  The  first  row  displays  the 
original  input  frames  to  a  classical  JTC.  The  second  row 
are  their  respective  joint  transforms  and  the  third  row 
their  correlation  planes.  The  various  combinations  of 
greyscale  and  binary  representations  are  present  for  both 
the  scene  and  template.  The  significant  result  here  is  that 
only  in  the  binary-binary  case  is  their  a  clear  winner  for 
the  highest  correlation  peak  which  correctly  locates  the 
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armored  personnel  carrier.  In  all  other  cases,  either  the 
tank  wins  out,  or  it  is  a  close  contender  (along  with  a  non 
target  bearing  zone  roughly  in  the  middle  of  the  scene) . 


abed 


■ 

Figure  12.  Simulation  showing  input  binarization  effects  on 
the  classical  JTC:  column  a)  input,  joint  transform,  and 
correlation  plane  for  binary  scene  and  template;  b)  same  for 
grey  scale  scene  and  binary  template;  c)  same  for  binary- 
grey;  d) same  for  grey-grey. 

To  make  interpretation  of  Figure  12  slightly  easier, 
Figure  13  is  offered.  Frames  a  through  d  represent  side 
views  of  surface  plots  of  the  four  correlation  planes.  They 
are  along  the  vertical  direction,  and  include  only  the  top 
crosscorrelation  region  of  the  plane.  Note  the  large  peak 


Figure  13.  Sideview  of  crosscorrelation  region  of 
correlation  planes  in  Figure  12.  Notice  large  peak  for 
binary  scene  and  template  inputs  in  a)  only. 

on  the  right  hand  side  for  13a.  The  peaks  in  all  four 
frames  correspond  to  the  dark  spots  in  the  crosscorrelations 
of  Figure  12. 

3.4  Experi mental  Results 

Only  a  sample  of  the  many  scenes  correlated  with 
templates  are  presented  here.  In  general,  they  will  be  used 
to  illustrate  various  points,  not  to  serve  as  evidence  of 
the  functioning  correlator. 

4  3 


The  quality  of  the  pictures  here  is  not  the  best.  For 
that  reason,  viewing  a  video  tape  of  these  images,  that  was 
created  and  left  behind  with  the  thesis  advisor  Dr.  Steven 
Rogers  (Major),  may  be  preferred. 

All  of  the  pictures  have  the  same  layout,  reading  left 
to  right  then  top  to  bottom:  a)  is  the  input  frame 
containing  both  the  scene  and  image;  b)  is  the  optically 
generated  joint  transform;  c)  is  the  optically  generated 
Fourier  transform  of  the  scene  alone;  d)  is  the  binarized 
version  of  the  difference  between  b  &  c;  e)  is  the  optically 
generated  correlation  plane;  f)  is  e  with  the  central 
autocorrelation  region  removed,  peak  locations  are  marked 
with  a  "+";  g)  is  the  original  input  frame  with  candidate 
target  locations  highlighted  with  "X"s;  h)  is  the  input 
frame  after  segmentation  based  on  candidate  target  location 
and  template  size;  i)  is  the  original  FLIR  scene  before 
binarization  for  display  on  the  MOSLM.  The  first 

correlation  is  performed  using  the  technique  discovered 
during  this  thesis  effort.  The  average  difference  (as 
opposed  to  the  sign  of  the  difference  like  the  simulation) 
between  the  pixel  values  of  the  joint  transform  and  those  of 
the  Fourier  transform  of  just  the  scene  was  used  as  a 
threshold  for  binarization.  The  results  are  pictured  in 
Figure  1 4 . 

Figure  15  shows  the  effects  of  using  just  a  mean  value 
threshold  for  binarization  on  the  joint  transform  plane, 
although  the  Fourier  transform  of  just  the  scene  is 
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Figure  14.  Hybrid  JTC  correlation  using  average  difference 
for  binarization  threshold  in  the  joint  transform  plane. 
Notice  X  on  target. 

pictured,  it  was  not  used  in  the  binarization  process. 

Notice  that  this  correlation  did  not  locate  the  target  (no  X 
appears) . 

Figure  16  is  like  Figure  15,  except  that  the  median 
value  was  used  for  binarization  instead  of  the  mean  value. 
This  median  value  was  the  basis  for  Javidi's  work.  Notice 
again,  that  the  correlator  failed  to  locate  the  target  (the 
Xs  miss  the  target) . 

Figure  17  is  like  Figure  14,  except  that  a  zero 
difference  (i.e.  the  sign  of  the  difference)  between  the 
joint  transform  and  the  Fourier  transform  of  the  scene  alone 
was  used,  rather  than  an  average  difference  for 
binarization.  The  correlation  peak  is  slightly  smaller 
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Figure  15.  Hybrid  JTC  correlation  using  the  mean  value  of 
the  joint  transform  plane  for  binarization .  No  candidate 
targets  identifed  (no  Xs) . 


Figure  16.  Hybrid  JTC  correlation  using  the  median  value  of 
the  joint  transform  plane  as  a  binarization  threshold. 

Notice  false  alarms  and  missed  detection  (Xs  appear  in  wrong 
spot)  . 
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here.  The  target  was  still  found,  but  an  on-axis  bright 
spot  was  identified  as  a  correlation  peak  as  well. 


Figure  17.  Correlation  using  zero  difference  as  a 
binarization  threshold  in  the  joint  transform  plane. 


Figure  18  demonstrates  the  correlator's  robust 
performance.  Although  the  template  and  scene  are  taken  from 
two  different  FLIR  files,  and  the  target  within  the  scene  is 
highly  corrupted  relative  to  the  template,  the  target  was 
still  located.  The  technique  of  Figure  14  is  used. 

Figures  19  and  20  demonstrate  the  usefulness  of  the 
segmentation  capability.  With  less  than  optimum  alignment 
and  using  only  a  zero  difference  threshold,  the  correlation 
of  Figure  18  produced  more  than  one  target  location.  Using 
the  segmented  scene  created  by  this  pass  through  the  JTC  as 
input  to  a  second  pass,  the  correlation  of  Figure  19 
results.  Notice  that  further  segmentation  of  the  scene  is 
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Figure  18.  Correlation  of  scene  and  template 
FLIR  file  origin. 


zero  difference  threshold  for 
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provided.  Classification  may  now  be  more  accurate  due  to 


this  segmentation.  A  third  iteration  may  also  be  possible. 


Figure  20.  Correlation  using  segmented  scene  as  input. 

Figure  21  demonstrates  the  possibility  of  locating 
partially  occluded  targets.  Notice  that  even  though  the 
entire  truck  is  not  present,  a  strong  correlation  peak  is 
still  returned.  The  effects  of  blooming  (the  horizontal 
line) ,  and  sampling  error  (the  vertical  fringes)  can  also  be 


seen  in  the  joint  transform. 

Finally,  Figure  22  shows  a  scene  with  a  target  with  a 
slight  out-of-plane  rotation  relative  to  the  template.  Note 
that  the  wheels  of  the  tank  are  not  as  pronounced  either. 
Despite  both  of  these,  the  target  was  still  recognized  by 
the  correlator  as  a  potential  target.  This  is  an  important 
result  if  a  correlator  is  to  be  used  as  a  tracker,  since 
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Figure  21.  Correlation  demonstrating  partially  occluded 
target. 


Figure  22.  Correlation  with  target  having  slight  out-of¬ 
plane  rotation  relative  to  template. 
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slight  out  of  plane  rotations  are  highly  likely  with  moving 
targets . 

3 . 5  Summary 

This  chapter  has  presented  information  concerning  the 
JTC  used  for  this  thesis.  History,  theory,  hardware 
software,  simulations,  and  experiments  all  have  been 
discussed.  A  new  technique  for  fringe  binarization , 
discovered  during  this  thesis  effort,  was  offered  as  an 
improvement  on  published  JTC  designs.  A  binary  mask  for 
FLIR  imagery  was  also  offered  that  provides  local  energy 
normalization,  thereby  improving  correlator  target  detection 
performance . 

Chapter  IV  will  provide  theory  and  experimental  results 
concerning  the  optical  LPCT  using  CGHs.  Chapter  V  will  then 
cover  the  use  of  both  the  JTC  and  the  CGH  in  the  hybrid 
architecture . 
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IV.  LOG  POLAR  COORDINATE  TRANSFORMATION  f LPCT) 

This  chapter  will  present  information  about  the  optical 
implementation  of  the  LPCT.  This  thesis  was  directed  only 
toward  incorporating  the  already  existing  CGHs,  made 
available  from  Perkin-Elmer  and  Mayo's  earlier  thesis  effort 
[8].  For  that  reason,  only  a  brief  discussion  of  theory  and 
manufacturing  processes  are  offered  here.  Further  details 
may  be  found  in  other  sighted  sources. 

Following  the  theory  and  manufacturing  processes 
sections,  some  hints  on  optical  techniques  will  be  given. 
Finally,  experimental  results  for  the  two  CGHs  will  be 
compared . 

4 . 1  Theory 

Image  processing  through  spatial  filtering  is  a  common 
practice  in  the  world  of  optics.  By  proper  placement  of 
transmissive  or  opaque  objects  in  the  focal  (or  Fourier) 
plane,  one  can  modify  the  modulation  transfer  function  of  an 
imaging  system  and  thereby  alter  the  resultant  image. 

The  field  of  holography  has  allowed  optical  engineers 
to  extend  this  image  processing  technique  to  alter  the  phase 
of  an  object's  spatial  frequencies  as  well  as  the  amplitude 
of  these  Fourier  components.  Used  as  a  spatial  filter,  a 
hologram  would  increase  or  decrease  the  path  length  of  light 
passing  through  certain  locations  in  the  Fourier  plane  with 
respect  to  other  locations.  This  alteration  of  path  length 
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is  tantamount  to  a  phase  modulation  of  the  wave  front 
passing  through  the  plane  of  the  hologram. 

As  it  turns  out,  this  sort  of  phase  modulation  through 
holography  need  not  be  performed  in  the  Fourier  plane  alone. 
In  fact,  many  have  shown  that  with  the  help  of  a  converging 
lens,  and  by  placing  the  proper  phase  function  in  the  object 
plane,  one  can  remap  the  light  amplitude  in  the  object  plane 
from  x-y  coordinates  to  log-polar  coordinates  (ln(r)-fl). 

Figure  23  shows  the  optical  arrangement  employed  by 
Mayo  to  perform  this  LPCT  [8:19].  The  CGH  is  placed 
immediately  behind  an  input  transparency  that  is  illuminated 
by  a  collimated  beam.  A  converging  lens  is  placed  exactly 
one  focal  length  beyond  the  input  plane,  and  in  front  of  the 
output  plane  where  a  CCD  camera  is  located. 

If  the  input  object  is  a  transparency  illuminated  by  a 
uniform  plane  wave,  then  light  leaving  the  object  can  be 
expressed  by  the  real  function: 

g(x;,yj)  (9) 

If  the  CGH  modulates  only  the  phase  of  the  input,  it  can  be 
expressed  as: 

j*  (X;,yj) 

e  (10) 

The  converging  lens  will  create  the  Fourier  transform  of  the 
input  in  the  output  plane.  So  the  light  at  the  CCD  can  be 
expressed  as: 

'"f"  j*(Xi,y,)  -j  (2w/xf)  (xjx0+yiyo) 

G(x0,y0)  =  g (x,- ,  yf )  e  e 

J  -  ®  J  -  co 

dXjdyj  (11) 
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Figure  23.  Mayo's  LPCT  optical  arrangement. 


where : 

x0  =  In  ( Xj2+y,-2) 1/2  =  ln(r,)  (12) 

yo  -  -tan^y/x,)  =  0.  (13) 

It  can  be  shown  [20:3099-3104]  that  the  equation  for 
^(x,»yj)  that  will  perform  the  lug-polar  mapping  is: 

$(*,■, Y,-)  =  (2?r/Af )  [ln(xj2+y]2)  1/^-yjtan'1  (y,/x,)  -x(  ]  (14) 

An  excellent  treatment  of  this  theory,  as  well  as  a  summary 
of  various  holographic  techniques  is  presented  in  Appendix  A 
of  the  dissertation  of  Andrew  J.  Lee  from  Carnegie  Mellon 
University  [21:153-192].  His  appendix  would  be  helpful  to 
those  interested  in  learning  more  about  this  subject. 

4.2  Manufacturing  Processes 

A  number  of  techniques  can  be  employed  to  create  the  <J> 
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function  described  above.  The  Perkin-Elmer  CGH  was  created 


using  a  technique  known  as  electron  beam  (E-beam) 
lithography.  The  Mayo-Hill  CGH  was  manufactured  using  a 
technique  known  as  transmittance  coding  using  a  carrier 
which  can  create  an  " interferogram . "  Other  possible 
techniques  include  detour  phase  holograms. 

E-beam  lithography  is  a  commonly  used  technique  in  the 
world  of  very  large  scale  integration  (VLSI)  circuits.  It 
can  also  be  used  to  etch  a  glass  sample  to  produce  thickness 
variations  across  its  surface.  These  thickness  variations, 
which  relate  to  variations  in  optical  path  length,  can  be 
made  to  correspond  to  the  desired  $  function.  The  Perkin- 
Elmer  sample,  created  by  this  technique,  was  etched  to 
provide  four  different  thicknesses,  as  opposed  to  the  more 
common  two  thicknesses  [22]. 

An  "interferogram,"  or  synthetic  binary  hologram, 
consists  of  a  transparent  material  that  has  opaque  lines 
drawn  upon  it.  The  lines  are  drawn  to  model  the 
interference  fringes  that  would  be  created  if  an  object  wave 
carrying  the  $  function  were  interfered  with  an  off  axis 
reference  wave.  Illumination  of  this  interferogram  with  an 
on  axis  plane  wave  would  produce  an  off  axis  object  wave 
carrying  the  <f>  function.  The  Mayo-Hill  CGH  was  produced  by 
drawing  the  fringes  using  a  laser  printer,  then 
photoreduc ing  this  output  onto  a  glass  plate  [8:80-84]. 
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4.3  Optical  Techniques 


The  first  optical  technique  employed  was  the  use  of  two 
lens  imaging  to  display  input  objects  onto  the  CGH  [9:27— 
28].  Since  both  the  MOSLM  and  the  CGH  had  finite 
thicknesses,  having  them  share  the  same  plane  would  be 
impossible . 

A  particularly  helpful  tool  created  during  this  thesis 
effort  was  a  MOSLM  test  pattern  used  to  qualitatively 
evaluate  the  performance  of  the  LPCT  process.  This  pattern, 
pictured  in  Figure  7a  of  chapter  III,  consists  of  three 
circles  whose  inner  and  outer  radii  are  logarithmically 
related,  and  8  radial  lines  (every  45°).  The  resultant  LPCT 
should  resemble  a  grid  pattern  like  the  one  pictured  in 
Figure  24.  In  this,  and  all  other  pictures,  increasing 
ln(r)  is  downward  on  the  page.  A  crown  shape  pattern  on  the 
bottom  is  due  to  the  fact  that  tne  MOSLM  has  a  square 
display  area.  On  top  is  a  lower  intensity  mirror  image. 

On  first  attempts  to  use  the  CGH,  some  problems  arose. 
The  first  was  that  since  the  MOSLM  was  a  pixelized  device, 
several  diffraction  orders  appeared  (see  Figure  25).  Rv 
placing  an  iris  at  the  focal  plane  of  the  two  lens  imaging 
system,  the  higher  diffracted  orders  of  this  sampling  were 
eliminated  (see  Figure  2  of  Chapter  I).  Keep  in  mind, 
however,  that  some  image  sharpness  is  lost  from  this. 

A  second  problem  was  that  of  camera  saturation.  Figure 
26  shows  the  results  of  not  placing  neutral  density  in  front 
of  the  camera. 
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Figure  24.  Log-polar  coordinate  transform  of  test  pattern 
using  Perkin-Elmer  CGH;  Appropriately  filtered. 


Figure  25.  Log-polar  coordinate  transform  of  test  pattern 
using  Perkin-Elmer  CGH;  No  spatial  filtering  is  employed. 


57 


Figure  26.  Log-polar  coordinate  transform  of  test  pattern 
using  Perkin-Elmer  CGH ;  no  neutral  density  employed. 

A  third  problem  was  one  of  scale.  As  it  turns  out,  for 
both  of  these  CGHs,  to  change  the  scale  of  the  LPCT,  one 
need  only  vary  the  focal  length  of  the  Fourier  transforming 
lens  used  (L4  of  Figure  2  in  Chapter  I)  [23 j.  For  the 
Perkin-Elmer  CGH  L4  was  86  mm,  and  for  the  Mayo-Hill  CGH,  it 
was  250  mm  that  allowed  for  maximum  use  of  the  CCD2  array. 

A  fourth  problem  was  that  of  extraneous  light 
distributions.  Both  CGHs  produced  on  axis  Fourier  transform 
"artifacts,"  as  well  multiple  reproductions  of  the  LPCT. 

The  Fourier  transform  artifacts  appear  as  bright  spots  on 
the  LPCT  image.  Both  these  and  the  multiple  reproductions 
could  simply  be  ignored  by  avoiding  these  areas  during  the 
framegrabbing  process. 
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Mayo-Hill  vs  Perkin-Elmer 


So  far  only  the  results  using  the  Perkin-Elmer  CGH  have 
been  shown.  Figure  25  displays  the  LPCT  of  the  test  pattern 
for  the  Mayo-Hill  CGH.  Clearly,  the  results  of  the  Perkin- 
Elmer  E-beam  CGH  sample  are  far  better  than  those  of  the 
Mayo-Hill  interferogram  sample.  However,  caution  should  be 
exercised  before  judgement  is  made.  Only  through  a  thorough 
understanding  of  all  of  the  issues  surrounding  these  two 
techniques  can  proper  conclusions  be  drawn.  Some 
observations  are  offered,  however. 


Figure  27.  Log-polar  coordinate  transform  of  test  pattern 
using  Mayo-Hill  CGH;  appropriate  neutral  density  and  spatial 
filtering  employed. 


James  Logue  at  Perkin-Elmer  has  suggested  that  their 
method  will  place  about  90%  of  the  total  incident  energy 
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into  the  primary  LPCT.  He  claimed  that  the  interf erogram 
technique  typically  places  10%  at  best  into  two  LPCTs  above 
and  below  the  axis  [22]. 

Both  CGHs  had  lower  intensity  "mirror  image"  LPCTs  that 
overlapped  the  LPCT  of  interest.  In  fact,  the  Perkin-Elmer 
sample  created  a  low  intensity  larger  scale  one  in  mirror 
that,  unfortunately  cannot  be  seen  in  Figure  22  (see  video 
tape  with  Dr.  Rogers). 

Both  CGHs  had  some  trouble  in  maintaining  sharp  lines 
for  both  the  circles  and  the  radials.  However,  the  Mayo- 
Hill  CGH  was  not  nearly  as  good  in  this  area.  The  sharpness 
of  the  lines  appeared  to  be  a  stronger  function  of  radial 
direction  than  of  radius. 

Not  a  defect,  but  certainly  worth  mentioning,  was  the 
fact  that  the  circle  of  smallest  radius  was  lowest  in 
intensity,  even  though  it  covered  the  same  amount  of  area  as 
the  others  in  the  log-polar  coordinate  space.  This  is  due 
to  the  fact  that  the  larger  the  circle,  the  more  pixels  it 
contains,  therefore,  the  more  total  energy  it  will  have. 

This  will  lead  to  a  tradeoff  in  the  selection  of 
neutral  density.  If  a  displayed  object  has  a  large  amount 
of  its  energy  at  large  radii,  then  the  risk  of  not  enough 
neutral  density  is  possible.  On  the  other  hand  if  most  of 
the  energy  is  at  small  radii,  the  risk  of  too  much  neutral 
density  is  possible.  Without  a  priori  knowledge  of  the 
displayed  object's  energy  distribution,  optimum  choice  of 
neutral  density  to  ensure  square  law  operation  of  the 
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detector  array  may  be  impossible. 


4 . 5  Summary 

This  chapter  briefly  discussed  the  theory  of  optically 
implementing  the  LPCT.  Also  briefly  discussed  were  the 
manufacturing  processes  for  creating  the  two  CGHs  used  for 
this  thesis.  Some  laboratory  techniques  were  suggested  and 
the  experimental  results  for  the  two  were  qualitatively 
compared . 

The  Perkin-Elmer  E-beam  CGH  sample  clearly  outperformed 
the  Mayo-Hill  interferogram,  both  for  total  energy 
delivered,  and  sharpness  of  the  image. 

The  next  chapter  will  present  results  of  the  hybrid 
optical/digital  architecture  employing  the  Perkin-Elmer  CGH. 
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V.  HYBRID  OPTICAL/DIGITAL  ARCHITECTURE 


This  chapter  discusses  the  architecture  designed  and 
implemented  for  this  thesis.  This  architecture  may  provide 
position,  scale  and  rotation  invariant  pattern  recognition. 
First,  the  architecture  will  be  described.  Then, 
engineering  considerations  will  be  discussed.  Finally, 
experimental  results  using  geometrical  test  objects  will  be 
presented . 

5.1  Hybrid  Architecture 

Figure  28  shows  the  hardware  configuration,  and  Figure 
29  is  a  flow  diagram  for  the  technique  used.  Refer  to  these 
for  clarification  of  the  following  discussion. 

Using  the  MOSLM  as  the  only  input  device  to  the  optics, 
the  hardware  configuration  of  Figure  28  can  perform  two 
separate  functions.  Using  the  beam  splitter  (BS),  light 
distributions  displayed  on  the  MOSLM  travel  the  optical 
paths  that  end  at  CCD1  and  CCD2  simultaneously.  At  CCD1, 
the  magnitude  squared  of  the  Fourier  transform  of  these 
distributions  can  be  detected.  While  at  CCD2 ,  the  magnitude 
squared  of  the  coordinate  transformation  can  be  detected  as 
discussed  in  Chapter  IV.  A  third  process,  joint  transform 
correlation,  is  performed  as  described  in  Chapter  III  using 
the  path  of  CCD1. 

The  PC  performs  all  equipment  control,  data  storage, 
and  intermediate  calculations.  Steps  3  and  6  of  Figure  29 
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Figure  29.  Hybrid  optical/digital  architecture  flow 
diagram . 
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are  accomplished  using  the  framegrabber  with  CCD1  and  CCD2 
respectively.  In  order  for  step  6  to  work  correctly,  the 
operator  must  throw  the  manual  switch,  so  that  CCD2  is 
connected  to  the  framegrabber.  After  step  6,  the  switch 
should  be  returned.  Future  implementations  may  include 
automation  of  this  step. 

Step  8,  correlation  of  the  LPCT- | FT | 2  features  of  the 
scene  and  template,  is  performed  ^.sing  the  JTC  described  in 
Chapter  III,  which  requires  the  optics  of  the  CCD1  path. 

Step  9  was  performed  by  the  PC,  however  software  for 
relating  these  peak  locations  to  scale  and  rotation  still 
needs  to  be  written.  Due  to  time  and  equipment  constraints 
this  thesis  effort  ended  with  this  step.  Observations 
through  this  point  will  be  explained  in  sections  5.2  and 
5.3. 

The  locations  of  these  peaks  are  to  give  the  proper 
scale  and  rotation  of  the  target  object  within  the  scene  as 
described  by  the  Horev  algorithm  [4].  Using  this 
information,  the  template  can  be  rectified  to  reflect  the 
proper  scale  and  rotation  in  step  10. 

Steps  11  through  13,  relating  to  the  correlation  of  the 
properly  scaled  and  rotated  (rectified)  template  with  the 
original  scene,  can  already  be  performed  by  the  JTC 
discussed  in  detail  in  Chapter  III. 

5,2  Engineering  Conside rat  ion? 

A  number  of  engineering  decisions  had  to  be  made  to 
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implement  the  first  seven  steps  of  Figure  29.  Discussion  of 
these  decisions  will  generally  follow  the  order  of  the 
steps,  however,  some  decisions  encompassed  several  steps. 

5.2.1  Binarize  Inputs.  Since  only  geometrical  test 
objects  were  used,  no  decision  at  step  1  was  necessary. 
However,  this  may  be  important  when  this  architecture  is 
tested  with  real  data. 

5.2.2  Display  Inputs  on  SLM .  To  minimize  the  effects 
of  the  optical  system's  varied  distortion  from  different 
parts  of  the  input  plane,  both  template  and  scene  were 
displayed  using  the  same  area  of  the  MOSLM  in  step  2. 

5.2.3  Capture  1  FT  I  2 .  Capture  of  the  | FT | c  in  step  3 
required  some  thought.  The  important  question  here  was: 

What  spatial  frequency  range  is  important  for 
discrimination?  This  question  was  raised  before  by  Kobel 
and  Martin  [5:31-33]. 

After  capture,  the  frame  would  have  to  be  displayed  on 
the  MOSLM.  Capturing  a  256X256  pixel  region  and  reducing  it 
to  128X128  would  allow  for  higher  spatial  frequencies  to  be 
displayed  (up  to  about  a  3  MOSLM  pixel  period  or  l'/2  pixels 
ON  1  /2  pixels  OFF  would  be  included)  .  These  higher 
frequencies  were  thought  to  be  able  to  provide  greater 
rotation  discrimination.  On  the  other  hand,  using  128X128 
CCD  pixels  could  put  greater  emphasis  on  the  lower 
frequencies  that  usually  determine  overall  size.  The 
simplest  correlation,  a  "+"  with  an  "X"  was  a  rotation 
problem,  so  since  scale  would  be  more  difficult,  the  128X128 
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region  was  usei. 

A  second,  less  complicated,  but  important,  issue  here 
was  the  positioning  of  the  camera  such  that  the  Fourier 
transform  was  exactly  centered  on  the  128X128  pixel  area 
captured  during  the  framegrab.  Software  designed  to  aid  in 
this  positioning  is  described  in  Appendix  G. 

5.2.4  Binarize  I  FT  I  2 .  The  next  decision  related  to 
step  4:  How  should  the  | FT | 2  features  be  binarized? 

This  time  the  nonuniformity  of  response  of  the  camera 
and  distortion  through  the  optical  system  would  apparently 
not  be  reduced  by  the  subtraction  of  two  frames  as  was  the 
case  in  the  JTC.  Not  so!  By  displaying  a  blank  MOSLM  and 
capturing  its  resultant  frame  at  CCD1,  an  estimate  of  the 
system  "bias"  was  acquired.  By  subtracting  this  frame  from 
the  ones  taken  for  the  scene  and  template,  an  improved  j FT | ? 
feature  set  was  provided. 

With  that  problem  solved,  the  next  job  was  to  decide  on 
a  threshold  for  binarizat ion .  Through  subjective  empirical 
analysis,  the  threshold  decided  on  was  five  times  the  mean 
value  of  the  entire  Fourier  plane  (after  subtraction  of  the 
bias  frame) . 

5.2.5  Display  I  FT  1 2  on  SLM.  The  first  consideration 
in  step  5  was  that  the  binarized  | FT | 2  had  to  fit  within  the 
MOSLMs  128X128  format.  Since  only  a  128X128  pixel  region 
was  captured  in  step  3,  this  was  not  a  problem.  However,  it 
may  become  important  for  future  research. 

A  second  issue,  that  was  not  remedied,  was  the  fact 
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that  the  TARGA  framegrabber  system  had  a  pixel  aspect  ratio 
of  .97  to  1  instead  of  the  1  to  1  ratio  of  the  MOSLM. 
Although  this  was  not  a  problem  for  the  JTC  of  Chapter  III, 
it  would  cause  problems  in  performing  the  LPCT. 

5.2.6  Capture  LPCT-lFTi2.  After  displaying  the  | FT | 2 
patterns  on  the  MOSLM,  the  LPCT  had  to  be  captured.  The 
horizontal  extent  of  the  captured  area  was  fixed,  since  this 
dimension  related  to  the  rotation  angle,  and  a  full  2n  had 
to  be  included  in  the  captured  region.  (Reference  to  Figure 
24  of  Chapter  IV  may  be  useful  here.) 

However,  the  concerns  of  Kobel  and  Martin  mentioned  in 
section  5.2.3  appeared  again  in  this  step,  and  a  decision 
about  the  vertical  extent  to  be  included  had  to  be  made.  In 
fact,  a  third  variable,  the  magnification  provided  by  the 
two  lens  ( L2  and  L3 )  imaging  system  could  be  changed  (within 
limits)  to  vary  th°  vertical  spread  of  spatial  frequencies 
in  this  LPCT- 1  FT  | 2  space.  The  mirror  images,  as  well  as  the 
Fourier  transform  artifacts  should  be  avoided  too.  Not  to 
mention  that  the  effect  of  the  two  bad  lines  of  the  MOSLM 
must  be  minimized. 

All  of  these  factors,  and  the  fact  that  the  Perkin- 
Elmer  sample  was  only  on  loan  for  three  weeks,  resulted  in 
the  following  decision:  The  area  captured  was  110X456  CCD2 
pixels,  which  included  radii  of  between  15  and  60  MOSLM 
pixels  or  30  and  120  CCD1  pixels  in  the  | FT  J  2  space.  These 
related  to  spatial  frequencies  of  between  3  and  12  MOSLM 
pixel  period  in  the  original  scene  and  template  space. 
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Childress  and  Walrond 


5.2.7  Binarize  LPCT-lFTl2. 
expressed  concern  about  the  spread  of  the  spatial 
frequencies  along  the  vertical  direction  [9:97].  This 


spread  relates  to  a  resolution  of  scale  used  for  template 
rectification.  To  minimize  this  problem  the  JTC  used  for 
correlation  of  the  LPCT- | FT | 2  features  would  use  inputs  that 
were  55X114  pixels,  instead  of  the  45X128  pixel  inputs  of 
the  JTC  used  for  the  FLIR  inputs  of  Chapter  III.  Additional 
gains  were  made  since  the  original  grabbed  frame  was  110X456 
pixels,  so  a  4  for  1  reduction  in  the  rotation  axis  was  made 
while  only  a  2  for  1  reduction  was  made  along  the  scale 
axis . 

A  system  bias  blank  HOSLM  frame  was  captured  like  the 
one  described  in  step  3  above,  and  it  was  subtracted  from 
the  LPCT- | FT | 2  feature  grabbed  frames  before  binarization . 
Binarization  was  performed  using  the  mean  value  of  the 
entire  grabbed  region  minus  the  bias  frame.  This  was 
arrived  at  by  subjective  empirical  means. 

5.2.8  Correlate  LPCT-|ft!2.  Now  that  a  binarized  pair 
of  LPCT- | FT | 2  features  were  available  for  display  on  the 
MOSLM,  correlation  could  be  performed.  Using  this  55X128 
pixel  input  configuration  meant  that  only  a  128X128  pixel 
area  in  the  joint  transform  plane  could  be  captured.  If  a 
256X256  pixel  region  were  captured  instead,  overlap  of 
various  orders  in  the  correlation  plane  might  occur.  This 
overlap  could  result  in  incorrect  correlation  peak 
ident i f icat ion . 
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Various  versions  of  templates  were  tried  in  this 
correlator,  including  the  normal  one,  a  180°-only  version, 
and  a  negative  of  the  180°-only  version.  The  180°-only 
version  was  tried  because  of  Childress  and  Walrond's  concern 
for  rotation  ambiguity  [9:96].  The  rationale  for  the  180° 
template  was  that  a  lit  vs  2 n  correlation  would  perform  the 
same  function  as  the  2ir  vs  4t t  correlation  that  they 
suggested.  In  either  case,  a  180°  ambiguity  would  still 
exist  due  to  the  symmetry  of  the  | FT | 2 . 

One  final  note  here  is  that  the  energy  typically 
displayed  in  these  LPCT-|FT|2  JTC  input  planes  is  greater 
than  those  of  the  input  planes  of  the  JTC  of  Chapter  III. 

For  that  reason,  additional  neutral  density  filtering  was 
necessary  between  LI  and  CCD1 . 

5.3  Experimental  Results 

Only  test  patterns  were  used  to  correlate  in  the  LPCT- 
|  FT  | 2  feature  space.  The  patterns  selected  were  a  "  +  "  and 
an  "x"  to  test  rotation  invariance,  and  squares  of  different 
sizes  to  test  scale  invariance. 

All  of  the  results  have  the  same  layout,  their  order  of 
display  was  governed  by  the  limits  of  the  framegrabber 
system.  The  figures  should  be  read  as  a  bock,  from  left  to 
right  in  four  columns,  then  top  to  bottom  in  three  rows.  In 

the  first  row  are:  a)  optically  generated  j FT | 2  of  the 
scene;  b)  a  minus  scene  bias  frame,  binarized  on  5  times  the 
mean  difference;  c'  optically  generated  ] FT | 2  of  the 
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template;  d)  c  minus  scene  b.as  frame,  binarized  on  5  times 
the  mean  difference.  In  the  second  row  are:  e)  original 
inputs  with  scene  on  top  and  template  on  bottom;  f) 
optically  generated  LPCT  of  b  and  d  (increasing  ln(r)  is 
downward  on  page) ;  g)  input  to  the  JTC  which  is  the  two 
LPCTs  of  f  minus  a  system  bias  frame,  binarized  on  the  mean 
difference  of  each.  In  the  third  row  are:  h)  optically 
generated  | FT | 2  of  g;  i)  optically  generated  | FT j 2  of  top 
half  of  g,  which  are  the  features  of  the  scene;  j)  h  minus 
i,  binarized  on  the  mean  difference;  k)  optically  generated 
| FT |  of  j,  which  is  the  correlation  plane. 

Figure  30  shows  the  system  results  for  a  "+"  and  an  "v" 
using  the  fill  360°  version  of  the  template.  Figure  33a 
represents  a  side  view  of  a  surface  plot  of  the  correlation 
plane  in  Figure  30k.  Only  the  top  crosscorrelation  region 
is  represented,  and  the  view  is  along  the  vertical 
direction.  Notice  the  peak  on  the  right  hand  side  of  33a, 
which  corresponds  to  one  of  the  dark  spots  in  the  upper 
right  hand  portion  of  Figure  30k.  Both  the  peak  and  the 
spot  are  roughly  in  the  location  of  a  45°  rotation. 

Secondary  peaks  also  exist  at  locations  of  about  -45°  and 
4/-1350. 

Figures  31  and  32  are  the  system  results  using  a  180°- 
only  template  and  a  negative  of  the  180°-only  template. 
Figures  33b  and  33c  are  to  Figures  31k  and  32k  respectively, 
as  Figure  33a  is  to  Figure  30k.  No  benefit  was  apparently 
derived  from  these  attempts  at  modifying  the  template. 
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Figure  30.  Correlation  of  LPCT- |  FT  r  features  of  an  "x"  and 
a  "+"  using  the  hybrid  architecture. 


Figure  31.  Correlation  of  I.  PCI  -  i  FT  |  ^  features  of  "x"  and 
"  +  "  using  hybrid  architecture  with  180°-only  template. 
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Figure  32 . Correlation  of  LPCT- | FT | ^  features  of  "x"  and 
"+"  using  the  hybrid  architecture.  Negative  180°  template 
used . 

Figures  34  and  35  are  the  system  results  of  correlating 
the  LPCT- | FT | 2  features  of  squares  fo  different  sizes.  In 
Figure  34,  the  scene  square  is  larger  than  the  template,  and 
in  Figure  35,  it  is  smaller.  Figures  36a  and  36b,  which  are 
horizontal  sideviews  of  the  surface  plots  of  34k  and  35k 
respectively,  demonstrate  the  extremely  noisy  correlation 
plane  results.  All  along  the  vertical  axis,  high  energy 
locations  that  may  be  misinterpreted  as  correlation  peaks 
exist.  This  is  caused  by  the  pixelization  of  the  fringe 


pattern  of  the  joint  transform  pl^ne,  and  its  effect  can 
only  be  reduced  by  increasing  the  number  of  display  pixels 
available  on  the  MOSLM  (say  from  128X128  to  1024X1024). 


Figure  33.  Vert  ice'  sideviews  of  top  portion  of  correlation 
planes  in:  a)  Figure  30k;  b)  Figure  31k;  and  c)  Figure  32k. 


Figure  34. Correlation  of  LPCT- | FT | d  features  of  large 
square  with  smaller  template  using  hybrid  architecture. 


Figure  35.  Correlation  of  LPCT- | FT |  features  of  a  small 
square  with  a  larger  template  using  hybrid  architecture. 


Figure  36.  Horizontal  sideviews  of  correlation  planes  in: 
a)  Figure  34k;  and  b)  Figure  35k. 

This  fact  was  contributing  to  the  on  axis  false  alarms  of 
chapter  III. 

Note  also  the  difficulty  of  acguiring  a  good  binary 
|  FT  j 2  feature  set  in  Figure  35b.  The  small  number  of  pixels 
illuminated  for  the  small  scene  square  of  35e  deliver 
inadequate  energy  to  the  | FT | 2  features  of  35a  to  be 
properly  binarized.  If  the  camera  had  greater  dynamic 
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range,  or  if  the  neutral  density  filtering  could  be 
controlled  by  the  amount  of  energy  input  (i.e.  the  number  of 
ON  pixels  at  the  MOSLM)  this  problem  might  be  reduced. 

Other  sources  of  distortion,  such  as  the  nonlinear  response 
of  the  CGH  or  the  effects  of  binarization  at  the  various 
stages  may  also  be  contributing  to  a  very  noisy  correlation 
plane.  All  of  these  variables  are  not  understood  well 
enough  to  make  proper  comment  here. 

5.4  Summary 

This  chapter  discussed  the  hybrid  optical/digital 
architecture  designed  and  implemented  for  this  thesis.  This 
architecture  was  to  provide  a  position,  scale,  and  rotation 
invariant  pattern  recognition  capability.  The  chapter 
described  the  architecture,  discussed  engineering 
considerations  related  to  its  design,  and  presented 
experimental  results. 

Only  marginal  results  were  achieved  using  this 
architecture,  as  evidenced  by  the  very  noisy  correlation 
planes.  The  effects  of  the  binarization  at  various  stepsis 
not  well  understood,  and  may  be  one  source  of  difficulty  in 
achieving  proper  correlation  in  this  LPCT-|ft|2  feature 
space . 

In  light  of  the  poor  correlation  results  in  the  LPCT- 
|  FT  | 2  feature  space,  no  attempts  at  template  rectification, 
and  subsequent  correlation  in  the  original  scene  space  were 
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made . 


VI .  CONCLUSION 


This  chapter  presents  a  summary  of  thesis  results, 
provides  conclusions  based  upon  these  results,  and  offers 
recommendations  for  future  research  effort. 

6.1  Summary 

There  were  three  major  goals  of  this  thesis:  1)  To 
develop  software  for  PC  control  of  display  of  real  FLIR 
imagery  on  the  MOSLM,  and  the  subseguent  capture  of  frames 
on  the  CCD  cameras;  2)  To  implement  and  test  an  optical 
joint  transform  correlator  using  the  techniques  and  data  of 
the  first  goal;  and  3)  To  design,  implement,  and  test  a 
hybrid  optical/digital  architecture  for  distortion  invariant 
pattern  recognition  like  the  KMH  algorithm,  employing  both 
the  joint  transform  correlator,  and  a  CGH  to  perform  the 
LPCT . 

Two  binarization  techniques  were  discovered  during  this 
thesis  effort.  The  first  was  developed  for  binarization  of 
input  FLIR  imagery.  This  technique,  described  in  section 
3.2.3,  provided  improved  correlation  results,  shown  in 
section  3.3,  over  those  obtained  for  FLIR  imagery  that  had 
not  been  preprocessed.  The  key  to  this  technique  was  that 
only  pixels  that  were  both  brighter  than  the  scene  average, 
and  brighter  than  a  local  3  pixel  by  3  pixel  average  were 
i  1 1  urn  mated  . 

The  second  binarization  technique  involved  binarization 
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in  the  joint  transform  plane  of  the  JTC.  This  technique, 
described  in  section  3.2.4,  provided  improved  correlation 
results,  shown  in  section  3.2.4  and  3.2.5,  over  other 
published  binary  JTC  techniques.  The  key  to  this  technique 
was  the  subtraction  of  the  | FT | 2  of  the  scene  alone  from  the 
|  FT  | 2  of  the  template  and  scene  displayed  together. 

The  performance  of  an  interf erogram  LPCT  CGH  created  by 
Mayo  [8]  and  Hill  [12]  was  compared  with  that  of  a  CGH 
created  by  E-beam  lithography  on  loan  to  AFIT  from  Perkin- 
Elmer  Corporation  [22].  The  Perkin-Elmer  CGH  provided 
superior  performance  both  in  diffraction  efficiency  and 
image  clarity  (see  Chapter  IV) .  However,  due  to  time 
constraints,  only  subjective  measures  were  possible. 

The  hybrid  architecture  was  used  to  perform  correlation 
of  the  LPCT- | FT | 2  features  of  geometric  objects.  Only 
marginal  results,  discussed  in  section  5.3,  were  obtained. 
For  that  reason  attempts  at  performing  template 
rectification,  and  subsequent  correlation  in  the  original 
image  space  were  not  made  as  discussed  in  section  5.1. 

6.2  Conclusions 

The  binarization  techniques  employed  for  both  the  FLIP 
input  data,  and  the  fringes  in  the  joint  transform  plane 
proved  successful,  and  show  great  promise  as  improvements  on 
existing  correlation  techniques. 

The  JTC  implemented  for  this  thesis  is  a  strong 
candidate  for  use  in  a  tracking  system  (after  target 


acquisition) .  It  could  also  be  used  in  more  controlled 
environments,  such  as  assembly  line  inspection,  where 
rotation  and  scale  invariance  may  not  be  so  important. 

The  improved  performance  of  the  Perkin-Elmer  E-beam 
sample  over  the  Mayo-Hill  inter ferogram  is  not  conclusive 
itself,  although  subjective  testing  in  this  thesis  does 
provide  strong  evidence.  Only  proper  modelling  of  the  two 
samples,  as  well  as  the  limits  of  both  techniques  can  shed 
sufficient  light  on  this  subject. 

In  light  of  the  marginal  results  achieved  with  the 
above  architecture  on  even  simple  geometric  objects,  much 
analysis  is  necessary.  Several  speculations  are  offered, 
that  only  proper  modelling  and  additional  testing  can 
verify.  The  additive  effects  of  binarization  and 
pixelization  at  the  various  stages  may  have  corrupted  the 
LPCT- | FT | 2  beyond  the  recognition  capability  of  the  JTC. 

6.3  Recommendations  for  Future  Research 

Recommendations  fo’-  follow  on  efforts  follow  two 
tracks,  one  along  the  lines  of  PSRI  pattern  recognition, 
another  along  the  lines  of  JTC  implementation.  A  list  of 
possible  research  areas  is  provided. 

1.  Investigation  of  alternate  frame  capture  regions, 
template  creation  and  binarization  techniques  are 
recommended.  These  may  have  prohibited  success  in 
correlating  the  LPCT-[ft(2  features. 

2.  The  KMH  algorithm  should  be  retested  digitally  using 


some  realistic  data  set.  Possible  candidates  could 
include  FLIR  or  SAR  data.  These  data  may  first  be 
segmented  using  any  number  of  segmentation  technigues, 
including  the  Gabor  transform  [24],  or  techniques 
employed  by  Mike  Roggemann  [25].  The  digital 
implementation  may  provide  important  insights  into  the 
optical  implementation  and  should  be  made  to 
model  as  many  limitations  of  the  optical  system  as 
possible . 

3.  Proper  mathematical  modelling  of  this  architecture, 
as  well  as  any  other  future  implementation,  will  help 
identify  architectural  weaknesses.  These  include 
weaknesses  both  in  hardware,  such  as  insufficient 
input  SLM  resolution  or  camera  resolution,  or 
software,  such  as  area  of  capture  and  binarization 
techniques . 

4.  If  proper  modelling  proves  the  E-beam  technique  to  be 
superior,  an  in  house  capability  of  developing  E-beam 
CGHs  could  be  developed  with  the  help  of  WRDC/EL  who 
possess  the  necessary  equipment. 

5.  LCTVs  should  be  investigated  as  a  substitute  for  the 
MOSLMs  used  in  this  architecture  to  eliminate  some  of 
the  binarization  effects. 

6.  The  CCD  cameras  should  be  considered  for  replacement 
with  either  a  CCD  of  greater  resolution  or  a  CID 
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f ramegrabber  system. 


7.  Other  techniques  for  developing  the  LPCT  should  be 
considered,  including  fiber  bundles,  unique  focal 
plane  array  mappings  (wedge  ring  etc.)  and  digital 
mapping . 

8.  The  necessary  code  for  template  rectification  should 
be  written. 

9.  Techniques  for  optically  implementing  the  phase 
reinsertion  step  of  the  KMH  algorithm  should  be 
developed . 

10.  An  alternative  architecture  for  the  JTC,  that  would 
reduce  its  length  from  two  focal  lengths  to  one  ocal 
length,  should  be  investigated  [1:84].  It  is  pictured 
in  Figure  37. 

11.  Finally,  a  JTC  fringe  binarization  threshold  based  on 
the  average  difference  could  be  sped  up  by  measuring 
the  total  energy  in  the  j  FT | 2  with  a  separate  detector 
off  a  sampling  beam  splitter.  Presently, 
determination  of  this  threshold  requires  summing  the 
pixel  values  accross  the  array  (See  Figure  37). 


82 


DETECTOR 


Figure  37.  Possible  improvement  on  joint  transform 
correlator,  featuring  shorter  total  length  (If  vs  normal 
2f) ,  and  a  detector  to  measure  total  energy  for  faster 
fringe  binarization  calculations. 


83 


APPENDIX  A.  MAGNETO-OPTIC  SPATIAL  LIGHT  MODIULATOR  (MOSLM) 


This  appendix  presents  information  relating  to  the 
MOSLM  used  in  the  experiments  of  this  thesis.  First  a  brief 
description  of  the  operation  of  the  MOSLM  is  given,  then 
some  useful  programs  will  be  described.  Computer  code 
written  during  this  thesis  effort  in  "C"  for  Borland's 
iurbo-C  compiler  is  also  included. 

A.l  MOSLM  Operation 

The  following  discussion  should  serve  only  as  a 
supplement  to  the  Semetex  manual  [26].  Technical 
representatives  at  Semetex  can  provide  additional 
information  as  well  [27]. 

Although  technically  incorrect,  the  MOSLM  can  be 
thought  of  as  an  array  of  128X128  rectangular  Pockels  cells. 
The  operation  of  the  individual  pixels  differ  from  a  Pockels 
cell,  in  that  the  MOSLM  uses  the  magneto-optic  effects  of 
the  iron  garnet  material  it  is  made  up  of,  rather  than  the 
electro-optic  effect  that  Pockels  cells  employ. 

The  MOSLM  modifies  the  index  of  refraction  of  the  iron 
garnet  material  by  applying  a  magnetic  field  across  a  pixel. 
This  field  is  applied  through  two  wires,  aligned  along  the 
cardinal  axes  of  the  array,  that  cross  at  one  corner  of  the 
pixel  of  interest.  After  all  the  selected  pixels  in  the 
array  are  individually  "nucleated",  a  write  pulse  is  applied 
tc  the  entire  array.  The  effect  here  is  to  increase  the 
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contrast  of  the  image  created  by  the  earlier  nucleation. 

Once  a  pixel  has  been  nucleated,  it  can  only  be  changed  by 
erasing  the  entire  array  with  an  erase  pulse. 

A  second  use  of  the  MOSLM  not  investigated  during  this 
thesis  effort  is  that  of  a  binary  phase  only  filter.  Since 
the  nucleation  of  the  pixel  changes  the  optical  path  length 
of  light  rays  passing  through  it,  the  entire  array  can 
provide  binary  phase  only  modulation  of  the  incident 
wavefront  by  removal  of  the  analyzer  (output  polarizer) . 

In  either  phase  modulation  or  the  abo.e  described  amplitude 
modulation  operation,  the  input  polarizer  may  not  be 
necessary,  since  its  only  purpose  is  to  properly  polarize  an 
already  polarized  collimated  laser  beam. 

The  individual  pixels  are  addressed  through  an 
interface  card  located  in  the  PC.  The  card  occupies  segment 
hex  BOO 0  in  the  software  listed  later  in  these  appendices, 
however  dip  switches  on  the  card  allow  for  this  base  address 
to  be  changed.  Each  byte  of  data  written  to  an  offset 
address  in  segment  hex  B000  represents  eight  pixels.  The 
offset  addresses  range  from  hex  0000  to  07FF  and  increase 
from  left  to  right  then  top  to  bottom  accross  the  array. 

The  eight  pixels  of  each  address  are  in  the  same  column  but 
in  eight  successive  rows.  The  least  significant  bit  of  each 
byte  of  data  represents  the  top  pix  and  the  most 
significant  the  bottom  pixel  of  the  eight  pixel  byte. 

Writing  a  zero  to  the  proper  bit  will  nucleate  the  pixel, 
while  writing  a  1  will  leave  it  unchanged.  I o  create  erase 


and  write  pulses  data  must  be  sent  to  offset  addresses  hex 
0800  and  0801  respectively. 

Although  a  maximum  of  eiqht  pixels  could  be  written  to 
at  a  time  with  this  digital  circuitry,  testing  showed  that 
any  more  than  two  pixels  would  result  in  inadequate 
performance  in  either  of  two  devices.  This  is  reflected  in 
all  of  the  software  in  these  appendices. 

Proper  alignment  of  the  MOSLM  requires  adjustment  of 
five  potentiometers  in  the  MOSLM.  Improper  alignment  may 
result  in  pixels  being  nucleated  before  being  written  to 
(leading  pixels)  or  pixels  not  being  nucleated  after  being 
written  to.  The  Semetex  manual  suggests  a  software 
generated  test  signal  be  applied  to  the  device  during 
alignment,  but  this  software  was  not  provided.  The  next 
section  describes  this  software  as  well  as  some  other  useful 
programs  for  use  with  the  MOSLM. 

A. 2  MOSLM  Software 

In  addition  to  the  software  developed  for  this  thesis 
effort  and  presented  below,  there  is  also  additional 
software  available  for  the  control  of  the  MOSLM.  The 
program  SMDISP.C  and  associated  files  can  be  found  in  the 
distribution  diskettes  provided  by  Semetex.  This  program 
allows  for  the  display  of  filer,  formatted  as  described  in 
the  manual . 

Four  programs  are  presented  here  that  required  no 
control  of  the  CCD  camera  to  be  useful.  The  first  is 
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SLM_TEST.C  tne  program  for  alignment  of  the  MOSLM.  It  is 
assumed  that  a  camera  will  be  operated  in  live  mode  and 
placed  in  an  image  plane  to  monitor  the  MOSLM  display  during 
execution.  The  next  two  are  CHECKER. C  and  CHECKER2 . C  that 
display  checkerboard  patterns  on  the  MOSLM.  With  a  camera 
in  the  Fourier  plane  in  live  mode,  these  two  programs  can 
lend  insight  into  appropriate  capture  regions  for  the 
framgrabber.  The  difference  between  the  two  is  that  pattern 
of  the  first  is  one  pixel  on,  one  pixel  off,  and  the  second 
is  two  on,  two  off.  The  last  program,  X-HAIR.C  displays  a 
large  crosshair  on  the  MOSLM,  that  can  be  used  for  optical 
system  alignment. 

Additional  software  controlling  the  MOSLM  will  also 
appear  in  Appendix  G.  To  understand  that  code  it  is  also 
necessary  to  understand  the  operation  of  the  TARGA 
framegrabber  system  discussed  in  Appendix  B. 
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/kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk'i 

/*  SLM_TEST. C 
/* 

/* 

/* 

/* 

/* 

/* 

/*This  program  is  a  variation  of  the  alignment  routine 
/*the  Semetex  manual.  I  believe  it  does  a  better  job 
/^leading  pixels. 

/*** 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
PROGRAM  FOR  SLM  ALIGNMENT 
by  Capt  John  Cline 
June  29,  1988 


sugges 
of  iden 


ted  by 
tifying 


kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 


■<*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

*/ 

V 

V 


^include  "stdio.h" 
#include  "string. h" 
^include  "time.h" 
unsigned  r,  q; 


ma in ( ) 

I 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO; 
*(semetex+0x800)=l ; 
wait(lOOO) ; 


/*SI>‘  is  at  bOOO  segment*/ 
/*erase  SLM*/ 
/*wait  or  lose  pixels*/ 


fkk  kk  kk  k  k  kk  kk  k  k  kk  k  k  k  kk 

printf ( "writing  horizontal  lines  \n"); 
do 
( 

for(q=0x0;  q<0x800 ;  q=q+0x80) 

{ 

for(r=0x0;  r<0x40;  r  +  +  ) 


■■*/ 


/*choose  only  left  half*/ 


*(semetex+q+r)=Oxfe ;  /*top  row  of  eight  row  byte*/ 

wait(5);  /*slow  down  so  you  can  watch*/ 

} 

for(r=0x0;  r<0x40;  r++) 

l 

*( seme tex+q + r ) =0x fb ;  /*third  row*/ 

wa i t  (  5 )  ; 

) 

for ( r=0x0 ; r<0x40 ; r++) 

( 

*(semetex  +  q+r)=Oxef ,  /* f i f t h  row*/ 

wa i t ( 5 ) ; 

i 

for  ( r=OxO  ;  r<0x40  ;  r  +  +  ) 

1 

*( seme tex+q tr) ^Oxhf ;  /*xeventh  row*/ 

wa i t ( 5 ) ; 
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for(q=OxO;  q<0x800;  q=q+0x80) 

! 

for(r=OxO;  r<0x40;r++) 

{ 

*(semetex+q+r)=Oxfd;  /-"'second  row*/ 

wait( 5) ; 

) 

for(r=0x0 ; r<0x40 ; r++) 

( 

*(semetex+q+r)=Oxf 7 ;  /*fourth  row*/ 

wait (5) ; 

) 

f or (r=0x0 ; r<0x40 ; r++) 

( 

*(semetex+q+r)=Oxdf ;  /*sixth  row*/ 

wait( 5) ; 

1 

for ( r=0x0 ; r<0x40 ; r++) 

{ 

*(semetex+q+r)=0x7f ;  /*eighth  row*/ 

wa i t ( 5 )  ; 

) 


for(q=0x0;  q<0x800;  q=q+0x80) 

{ 

for(r=0x40;  r<0x80;r++)  /*choose  only  right  half*/ 

l 

*(semetex+q+r)=Oxfe ; 
wait ( 5) ; 

\ 

for (r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=Oxfb ; 
wait (5) ; 

) 

for (r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=Oxef ; 
wa i t ( 5 ) ; 

1 

f or ( r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=Oxbf ; 
wa  i  t ( 5 )  ; 

) 


for(q=0x0;  q<0x800 ;  q=q+0x80) 
( 

i'...-(r=0x40;  r<0x80;r++) 

( 

*(semetextq+r) =0xfd ; 
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wait( 5)  ; 

) 

for (r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=0xf7 ; 
wait (5) ; 

) 

for (r=0x40 ; r<0x80 ; r++) 

{ 

*(seme tex+q+r ) =0xdf ; 
wait (5) ; 

\ 

for (r=0x40 ; r<0x80 ; r++) 

{ 

*( seme tex+q+r) =0x7 f ; 
wait (5) ; 

) 


wait(3000) ; 

*(semetex+0x801)=l ; 
wait(5000) ; 

*(semetex+0x80o ;=0 ; 

for(q=0x0;  q<0x800;  q=q+0x80) 

{ 

for(r=0x40;  r<0x80;r++)  /*start  with  right  side  first  now*/ 

{ 

*(semetex+q+r)=Oxfe ; 
wait (5) : 

) 

for (r=0x40 ; r<0x80 ; r++) 

{ 

*(semetex+q+r)=Oxfb ; 
wai t ( 5) ; 

I 

for (r=0x40 ; r<0x80 ; r++) 

( 

* ( semetex+q+r )=0xef ; 
wa i t ( 5 )  ; 

) 

for ( r=0x40 ; r<0x80 ; r++) 

{ 

*(semetex+q+r)=Oxbf ; 
wait (5) ; 


/*take  a  quick  look*/ 
/*pulse  the  SLM  for  improved  contrast*/ 
/*take  another  look*/ 
/*erase  the  SLM*/ 


for(q=0x0;  q<0x800;  q=q+0x80) 
( 

for(r=0x40;  r<0x80;r++) 

I 

* ( seme  tex+q+r )=0xfd ; 
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W  3.  i  t  (  5  )  , 

) 

for ( r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=Oxf 7 ; 
wait(5) ; 

} 

for (r=0x40 ; r<0x80 ; r++) 

( 

*(semetex+q+r)=Oxdf ; 

wait (5) ; 

) 

for ( r=0x40 ; r<0x80 ; r++) 

{ 

*(serr.etex+q+r)=0x7f ; 
wait(o) ; 

) 


for(q=0x0;  q <0x800;  q=q+0x80) 

! 

for ( r=0x0 ;  r<0x40;r++)  /*then  the  left  side*/ 

{ 

*(semetex+q+r)=Oxfe ; 
wa i t ( 5 )  ; 

) 

for ( r=0x0 ; r<0x40 ; r++) 

{ 

*(aemetex+q+r)=Oxfb ; 
wa i t ( 5 )  ; 

) 

f or ( r=0x0 ; r<0x40 ; r++) 

( 

*(semetex+q+r)=Oxef ; 
wa i t ( 5 )  ; 

} 

for(r=0x0 ; r<0x40 ; r++) 

{ 

*(seraetex+qtr)=Oxbf ; 
wa i t ( 5 )  ; 

} 

) 

for(q^0x0;  q<0x800;  q=q+0x80) 

( 

for(r=0x0;  r<0x40;r++) 

( 

*( semetex+q+r )=0xfd ; 
wa i t ( 5 )  ; 

1 

for ( r-OxO ; r<0x40 ; r++) 

( 

*(semetex+q+r)=0xf 7 ; 
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wait (5)  ; 


for ( r=0x0 ; r<0x40 ; r++) 
t 

*tsemetex+q+r)=Oxdf ; 
wait ( 5)  ; 

) 

for (r=0x0 ; r<0x40 ; r++) 

( 

*( seme tex+q+r) =0x7 f ; 
wa i t ( 5 ) ; 


wait ( 3000)  ; 

*  (seme ter. :  0x202  )  =  1  ;  /^contrast*/ 

wait(5000) ; 

*( semetex+0x800)=0 ;  /*erase*/ 

printf("type  q  if  you  want  to  go  on  to  vertical  \n"); 

) 

while (ge tch( ) !  = ' q ' )  ; 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk 

pr intf ( "writing  vertical  lines  \n" ); 
do 


>r>r  k  >r 


kk  kk  kk  / 


( 


for(r=0x00;  r<0x80;  r=r+0x02)  /*even  columns  starting  with  zero*/ 


for(q=0x000;  q<0x400 ;  q=q+0x080) 

{ 

*(semetex+q+r)=0x3f 
* ( semetex+q+r)=0xcf 
*(semetex+q-t-r)=0xf  3 
*( seme tex+q+r )=0xfc 
wait(20)  ; 


/*top  half  only*/ 
/*write  two  bytes  at  a  time*/ 


/*slow  down  so  you  can  see*/ 


} 

for(r=0x01;  r<0x80;  r=r+0x02)  /*odd  columns  starting  with  one*/ 


for(q=0x000;  q<0x400;  q=q+0x80) 


*( seme  tex : q+r )=0x3f 
*(. seme tex+q+r )=0xcf 
*( seme  tex+q+  r ) =0xf 3 
* ( seme  tex+q  +  r ) =0xfc 
wa i t ( 2  0 )  ; 


for(r=0x00;  r<0x80;  r=r+0x02) 

{ 

for(q=0x400;  q<0x800;  q=qf0x080)  /*bottom  half  only*/ 

I 

*(semrtex+qfr)=0x3f ; 
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*(semetex+q+r)=0xcf ; 
*(semetex+q+r)=0xf3 ; 
*(semetex+q+i )=Oxfc ; 
wait(20) ; 

} 

) 

for(r=0x01;  r<0x80;  r=r+0x02) 

{ 

for(q=0x400;  q<0x800;  q=q+0x80) 

( 

*(s°metex+q+r)=0x3f ; 

*( semetex+q+r)=Oxcf ; 
*(semetex+q+r)=0xf3 ; 

* (semetex+q+r ) =Oxfc ; 
wait(20) ; 


wait(3000) ; 

*(semetex+0x801)=l ; 
wait(5000)  ; 

*(semetex+0x800)=0 ; 

for(r=OxOO;  r<0x80;  r=r+0x02) 

( 

for(q=0x400;  q<0x800;  q=q+0x080)  /*now  start 

{ 

*( seres tex+q+r ) =0x3  f ; 

* ( seme  tex+q+r ) =0xc  f ; 

*(semetex+q+r)=0xf 3 ; 

*(semetex+q+r)=Oxfc ; 
wait ( 20)  ; 


for(r=0x01;  r<0x80;  r=r+0x02) 

l 

for(q=0x400;  q<0x800 ;  q=q+0x80) 

{ 

*( semetex+q+r )=0x3f ; 

* ( seme tex+q+r )=0xc  f ; 

*(semetex+q+r)=0xf 3 ; 

*(semetex+q+r)=Oxfc ; 
wait (20) ; 

) 

) 

for(r=0x00;  r<0x80;  r=r+0x02) 

( 

for(q=0x000;  q<0x400;  q=q+0x080)  /*Chen 

I 

* ( seme tex+q  +  r ) =0x3  f ; 

*(semetex+q+r)=Oxcf; 

*(semetex+q+r)=0xf3 ; 

*( seme tex+q+r ) =0x f r ; 
wa i t ( 20)  ; 


/'-'^contrast*/ 

/-erase*/ 

wit!',  bottom*/ 


do  top  half*/ 
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} 

for(r=0x01;  r<0x80 ;  r=r+0x02) 


for (q=OxOOO ;  q<0x400 ;  q=q+0x80) 

{ 

*(semetex+q+r)=0x3f ; 
*(semetex+q+r)=Oxcf ; 
■*(ocm<itex+q+r)=0xf3 ; 
*(semetex+q+r)=0xfc ; 
wait(20) ; 


wait( 3000) ; 

*(semetex+0x801)=l ;  /'-contrast*/ 

wait(5000) ; 

*(semetex+0x800)=0 ;  /'-'erase*/ 

printf("type  q  if  you  want  to  quit  \n"); 

} 

while  (getch( )  !  «'  q  '  )  ; 

} 

A  A  A  A  A  A  A  A'  A  A-  *  V  A  A  A  A-  A  A  f 

delayO"  that  could  be  used  */ 

*/ 


/AA  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A 

/'-'TURBO-C  has  a  time  delay  function  1 
/'-'instead  of  this  wait()  subroutine. 


wait(t) 

{ 

time_t  start,  finish; 
time (&start)  ; 
time(&f inish) ; 

while(difftime(f inish,  start)  <  t/1000) 

( 

time (&f inish) ; 
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f  k  k  k  k  k  k  k  k  k  k  k  k  k  k k  k  k  k  k  k  k  k  k k  k  -A*  k  k  k  k  k k  k  k k  k  k  k  kk  k  k  k  k  k  k  k  k  k  -A'  k  -A-  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 

/*  CHECKER. C 


A  k  / 


/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  CHECKERBOARD  PATTERN  GENERATOR  FOR  THE  SLM 

/*  by  Capt  Joan  Cline 

/*  August  31,  1989 

/* 


/"This  program  will  display  a  checkerboard  pattern  on  the 
/* i s  useful  for  bench  alignment,  since  the  maximum  spatial 
/*will  be  present  iii  the  Fourier  plane.  Another  program, 
/*will  display  a  checkerboard  pattern  of  half  the  maximum 
/^frequency,  or  2  pixels  ON,  2  pixels  OFF. 

/  kk'kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk'.'kkkkkkkk  kk 


SLM.  This 
f  requeue v 
CHECKER/  C 
s  p  a  t  i  a  1 


'V 

■k  / 


>r/ 


*/ 

*/ 

*/ 


^include  "stdio.h" 
-include  "string. h" 
^include  "time.h" 
unsigned  r,  q; 

ma in( ) 


char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ;  /"SLM  Is  at  bOOO  segment:*/ 

*(semetex+0x800)=  1 ;  ,/*erase  SLM*/ 

wait(lOOO);  /*wa i t  or  lose  pixels*/ 

/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  k  k  f 

for(q=0x000;  q<0x800;  q=q+0x080) 

I 

for(r=0x00;  r<0x80;  r=rt2) 

I 

*(semetex+q+r)=Oxfe ; 

*( seme tex+q+r )=0xfb; 

* ( seme  tex+q+r ) =0xe  f ; 

*( seme  tex  +  q  +  r ) =0xbf ; 

1 

for(r=0x01;  r<0x80;  r=r+2) 

( 

*( seme tex+q  t  r) =0xfd ; 

*(semetex+q+r )=0xf7 ; 

*(semotex+q+r)=Oxdf ; 

*( seme tex+q +  r )=0x7  f ; 


* ( seme  text  0x801 )  =  0 ; 

) 


k  k 


f kk  kk  kk  kk  kk  kk  kk  kk 

/*TURB0-C  has  a  time  delay  function  "dolav()"  that  couici  he  used 
/*instead  of  this  wait()  subroutine. 


*/ 
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wa 1 1 ( t ) 


{ 


time_t  start,  finish; 
t ime (&s  ta  r t )  ; 
t  ime  (.Stf  inish)  ; 

while  (.di  ff  time  (  finish  ,  start)  <  t/1000) 

( 

time (&finish) ; 


/  V-r  k  'k  kkkkkkkk  kkkkkkkkkk 


kkkkk  k  k  k k  k  k 


«•-  st. -'- -y -y *y -y ^y ..y ^ ^y .y ^y -,y y, .^y  ..y  >y  ,y »y -j- *•- ^y ^ ~y -y  .j, .*.  ,y *- .«. ,«. >y ,y .y  ..y .y .•. 

/*  CHECKER/. C 
/* 

/ 


/* 

/* 

/* 

/* 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CHECKERBOARD  PATTERN  GENERATOR  FOR  THE  SIM 
by  Capt  John  Cline 
August  31,  1989 


/-'This  program  will  display  a  checkerboard  pattern  on  the  SIM. 
/*Unlike  CHECKER, C,  which  turns  one  pixel  ON,  then  one  pixel  OFF 
/*t.his  program  turns  two  pixels  ON,  then  two  pixels  OFF. 


*  / 

*/ 

*/ 

*/ 

*/ 
'k  / 

*/ 
*/ 
*/ 
*/ 
*  / 


^ include  "stdio.h" 

-  include  "string. h" 
~ include  "time.h" 
unsigned  r,  q; 


,/*SIM  is  at  b(K)0  segment */ 
/-'•erase  SLM*/ 
/*v;i  i  t  or  lose  pixels*/ 


it’, i  i  n( ) 

( 

char  far  *semetex, 
semetex  (char  far  *)  OxbOOOOOOO ; 
*  ( seine  tex  *  0x800 )  =  1 ; 
wa i t ( 1000 )  ; 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k 

for (q=0x000 ;  q<0x800;  q-q4-0x080) 
i 

for ( r -0x00 ;  r<0x80;  r=rt4) 

1 

* ( s  e me tex  +  q+  r)=0xfc; 

* ( seme  tex \ q +  r ) =0xc f ; 

*  (  seine  t  ex-t  q  tr  + 1 )  =0xf  c. ; 

*  ( s  e  in  e  t  e  x  t  q + r  + 1 ) "  0  x  c  f  ; 

I 

t  or ( r- 0x02  ;  r<0x80 ;  r=i +4 ) 

I 

* ( seme t ex tq  t  r )  M)x  f  i  ; 

* ( seme tex+q+r) =0x3 f ; 

*  ('  seme  tex  t  q  i  r  1 1 )  =  0xf  3  ; 

* ( seme t  ex  *  q  +  r  ♦  1 ) - 0x3 f ; 


*  i  seme  t  ex  +  0x801  ) 


.'''-■TURBO- C  has  a  time  delay  function  "del  av(  ' "  that  could  he  used 
"instead  of  this  wait!)  subroutine. 


wa  i  t.  ( t  ) 


t i me  t  start,  f i n i sh ; 


time (&start) ; 
time(&f inish) ; 

while (diff time ( finish ,  start)  <  t/1000) 

( 

time(&finish) ; 

) 


/•k-k'k'k'kk'k'k-k'k'k'k'k'k'k'k'kk 


'k'k'k'k'k'k'k-k'k'k'k'k'k'k'k'k'kk'k'k'k'kk'k'k'k 
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/*  X_HAIR . C 
/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  CROSSHAIR  PATTERN  GENERATOR  FOR  THE  SUM 

/*  by  uapt  John  Cline 

/*  August  31.  1989 

/* 

/*This  program  will  display  a  crosshair  pattern  on  the  SUM.  This  is 
/^useful  for  bench  alignment,  since  the  diffraction  pattern  in  any 
/*plane  (image,  Fourier,  or  anywhere  in  between)  resembles  a 
/'^crosshair.  As  successive  optical  elements  are  inserted  into  the 
/^optical  path  the  optic  axis  should  not  move.  Therefore,  even 
/^though  the  pattern  that  the  crosshair  makes,  as  viewed  by  a  fixed 
/^camera,  will  change  with  addition  of  optical  elements,  the  spot 
/*where  the  center  of  the  crosshair  like  pattern  is  located  should 
/^remain  the  same  provided  the  SUM  centers  the  original  crosshair  on 
/*the  optic  axis . 

/&&&&&&&&&&&&&&&&  k'k'k'k'ky' 

^include  "stdio.h" 

^include  "string. h" 

#include  "time.h" 
unsigned  r,  q; 

main( ) 


char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ; 

*(semetex+0x800)=l ; 

wait(lOOO) ; 


/*SLM  is  at  b( 


segment*/ 


/-erase  SLM*/ 
/*wait  or  lose  pixels*/ 


/*write  four  columns*/ 
for(q=0x0;  q<0x800;  q=q+0x80) 
l 

*(semetex+q+63)=Oxfc ; 
*(semetex+q+63)=0xf3; 
*(semetex+q+63)=0xcf ; 
*(semetex+q+63)=Ox3f ; 
*(semetex+q+64)=0xfc ; 

* ( seme tex+q+64 ) =0xf 3 ; 

*( seme tex+q+64 )=0xcf ; 
*(semetex+q+64)=0x3f ; 
*(semetex+q+62)=Oxfc ; 
*(semetex+q+62)=0xf3 ; 
*(semetex+q+62)=0xcf ; 

*( seme tex+q+62) =0x3 f ; 
*(semetex+q+65)=0xfc ; 
*(semetex+q+65)=0xf3 ; 
*(semetex+q+65)=0xcf; 
*(semetextq+65)=Ox3f; 

) 
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/*write  four  rows*/ 
for(q=0x0;  q<0x80;  q++) 

{ 

* ( semetex+q+128*7)=Ox3f ; 

*(semetex+q+128*8)=0xfc ; 

) 

*(semete:;+0x801)=0 ;  /*write  pulse  for  contrast*/ 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk / 

/*TURBO-C  has  a  time  delay  function  "delayO"  that  could  be  used  */ 

/^instead  of  this  wait()  subroutine.  * / 

wait ( t) 

( 

time_t  start,  finish; 
time (&start) ; 
time (&f inish) ; 

while(difftiine(fir.ish,  start)  <  t/1000) 

I 

time (&f inish) ; 


) 

/kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 


kkkkkkkkkk / 
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APPENDIX  B.  TARGA  FRAMEGRABBER  SYSTEM 

This  appendix  presents  information  relating  to  the  AT&T 
Truevision  Advanced  Raster  Graphics  Adapter  (TARGA) 
framegrabber  board  for  IBM  compatible  PCs  used  in  the 
experiments  of  this  thesis.  First  a  brief  description  of 
the  operation  of  the  TARGA  is  given,  including  its  file 
format.  Next  some  software  provided  by  the  vendor  will  be 
described.  Finally,  batch  and  command  files  ( . CMD)  for  use 
with  the  vendor  program  TESTTARG.EXE  will  be  presented. 

The  following  discussion  should  serve  only  as  a 
supplement  to  the  TARGA  manuals  [28]  [29]  and  documentat ion 

files  provided  with  the  vendor  software  [30]  [31]  [32]  [33]. 

Information  concerning  the  SONY  CCD  cameras  used  with  the 
TARGA  system  can  be  found  in  its  manual  [34]. 

B.l  TARGA  Operation 

The  TARGA  framegrabber  is  capable  of  taking  a  video 
signal  input  and  digitizing  it.  It  can  accept  NTSC  video 
from  any  source  including  a  VCR  or  camera.  The  digitized 
signal  is  400  pixel  lines  by  512  pixel  columns  and  samples 
about  80%  of  the  normal  monitor  display  in  both  dimensions. 
The  individual  pixels  are  represented  by  eight  bit  grey 
scale  using  unsigned  byte  format.  The  brightest  pixels  will 
have  a  value  of  hex  FF  and  the  darkest  hex  00.  Although 
other  Truevision  hardware  products  allow  for  color  images, 
the  TARGA  8  boards  available  at  AFIT  are  only  black  and 


white  devices. 
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Not  only  can  these  TARGA  boards  digitize  video  inputs, 
but  they  can  also  store  these  digitized  images  in  a  file. 
These  files  can  be  recalled  to  the  board  later  for  redisplay 
on  a  video  monitor  (not  the  PC  monitor)  using  the  VIDEO  out 
port  of  the  card.  The  VIDEO  OUT  port  of  the  card  will 
either  transmit  the  signal  of  the  VIDEO  IN  port  or  the 
digitized  image  resident  on  the  card  depending  on  software 
selection  of  these  two  alternatives. 

Files  saved  by  the  TARGA  8  boards  all  have  the  same 
format.  Unlike  most  other  raster  image  files  whose  origins 
are  in  the  upper  left  hand  corner,  the  origin  of  TARGA  8 
files  created  by  the  vendor  software  is  in  the  lower  left 
hand  corner.  After  18  bytes  of  header  data,  the  grey  scale 
pixel  data  is  listed  serially  from  left  to  right  starting 
from  the  bottom  row.  The  actual  header  format  for  the  TARGA 
8  data  type  (type  3)  is  not  listed  in  the  manuals  provided 
by  the  vendor,  but  it  appeared  as  though  it  was  the  same  as 
data  type  1  that  was  detailed  in  the  TARGA  manual  [28:E-2]. 

Dip  switches  on  the  TARGA  board  allowed  the  user  to 
define  several  important  specifications  for  addressing  the 
TARGA  board.  Switches  could  select  both  a  segment  and  an 
offset  address  for  the  board  [28:B-1].  The  segment  and 
offset  used  throughout  this  thesis  were  hex  D000  and  0220 
respect ively . 

The  DOS  environmental  variable  TARGA  must  be  set  to 
reflect  these  before  running  software  that  uses  the  TARGA 
board.  The  variable  TARGASET  must  also  be  initialized  to 
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board.  The  variable  TARGASET  must  also  be  initialized  to 
specify  capture  region,  board  type,  and  sync  source. 

B . 2  TARGA  Software 

Software  for  the  TARGA  can  be  divided  into  four 
categories:  1)  TRUEART;  2)  C  library  routines;  3)  utilities; 
and  4)  batch  files  and  TESTTARG  command  ( . CMD)  files. 

The  program  TRUEART.EXE  was  supplied  with  the  TARGA  8 
boards  when  they  were  purchased  [30],  and  offers  user 
friendly  control  of  the  TARGA  8  board.  Documentation  for 
this  program  is  included  in  the  manual  [28:3-1]. 

The  C  library  routines  are  a  collection  of  programs 
written  for  Microsoft-C  compilers,  including  Quick-C.  They 
were  not  used  during  this  or  any  other  thesis  effort. 
However,  documentation  [29]  and  the  disk  [31]  are  available 
for  future  use.  They  can  provide  the  greatest  control  of 
the  TARGA  8  board. 

The  utilities  can  be  found  on  two  diskettes, 

"Truevision  Trutilities"  [32]  and  the  "TARGA  Software  Tools 
Utilities  Disk"  [33],  The  Trutilities  disk  includes, 
amongst  others,  programs  to  convert  TARGA  files  to 
Encapsulted  PostScript  (.EPS)  file  format  and  Tagged 
Information  File  Format  (.TIF).  The  .EPS  file  format  can  be 
imported  to  LATEX  and  the  .TIF  file  format  can  be  imported 
to  Word  Perfect  5.0.  Unfortunately,  these  two  programs  have 
problems . 

After  running  TRUEPS.EXE  to  convert  to  .EPS  format,  the 


103 


last  two  command  lines  must  be  removed  to  make  the  file 
useful  in  LATEX.  This  can  be  done  using  any  ASCII  editor 
[35]  . 

The  program  TRUETIF.EXE  creates  files  that  are  not 
properly  read  by  Word  Perfect  5.0.  Which  program  is 
incorrect  is  not  clear.  Details  of  this  problem,  as  well  as 
its  solution  can  be  found  in  Appendix  F. 

The  utilities  on  the  "TARGA  Software  Tools  Utilities 
Disk"  include  the  programs  TARGAGET.EXE  and  TESTTARG.EXE. 
TARGAGET.EXE  simply  displays  a  TARGA  file  on  the  video 
monitor.  While  the  very  useful  TESTTARG.EXE  allows  for  user 
interactive  control  of  the  TARGA  board. 

To  allow  for  easy  use  of  the  program  TARGAGET.EXE  a 
batch  file  was  written,  and  kept  in  the  root  directory  of 
the  PC.  The  user  could  simply  type  "display  filename . ext" 
at  the  C>  prompt  to  display  a  file  on  the  video  monitor. 
Where  filename. ext  is  the  complete  path  of  the  TARGA  file  of 
interest.  The  batch  file  is  listed  below: 

: DISPLAY . BAT 

:This  batch  allows  display  of  a  TARGA  file  from  any 
.•directory  by  executing  TARGAGET  after  initializing  the 
:TARGA  variables  notice  that  a  filename  must  be 
: specified  when  TARGAGET  is  invoked  (the  %1  is  the 
:clue)  likewise  for  this  batch  the  proper  DOS  command 
:would  be  Odisplay  path\f ilename. ext 

echo  off 
els 

CD  \TARGA 
SET  TARGA=2 4 7 
SET  TARGASET=T8X-10G 
targaget  %1 

Notice  that  since,  in  general,  the  TARGA  files  were 


stored  in  the  \TARGA  directory,  only  the  filename  and 
extension  needed  to  be  typed  using  this  batch  saving  the 
keystrokes  of  the  directory  name.  Notice  also  the  setting 
of  the  two  environmental  variables,  TARGA  and  TARGASET. 

TESTTARG.EXE  was  by  far  the  most  useful  program  made 
available  for  this  thesis.  Although  it  was  originally 
written  to  be  used  interactively  through  the  keyboard,  DOS 
allows  for  redirection  of  program  execution.  In  other 
words,  a  file  containing  all  desired  keyboard  entries  could 
be  specified  when  executing  a  program.  By  convention,  these 
files  have  the  extension  . CMD. 

At  the  C>  prompt,  typing  "TESTTARG  <path\f ilename . cmd" 
would  execute  the  program  TESTTARG  using  the  command  file 
specified  by  path\filename.cmd.  The  instructions  listed  in 
the  .CMD  file  for  the  control  of  the  TARGA  board  would  then 
be  executed  as  if  the  user  were  typing  them  in  after 
TESTTARG  prompts.  For  better  understanding,  running 
TESTTARG  interactively  is  suggested.  Help  is  available. 

Another  useful  batch  file  LIVE . BAT  puts  the  TARGA  board 
in  live  mode  by  executing  TESTTARG  using  the  command  file 
dive. cmd.  BOTH  files  are  provided  below: 

: LIVE . BAT 

:this  program  simply  puts  the  TARGA  board  in  live 
: camera  mode. 

echo  off 
els 

CD  \TARGA 
SET  TARGA=2  4  7 
SET  rraiRGASET=T8X~10G 
testcarg  clive.cmd 


: LIVE.CMD 

:This  file  will  put  the  targa  board  in  live  mode  when 
:used  as  a  batch  with  testtarg.exe.  The  DOS  command  is 
:"testtarg  <live.cmd". 

1  ive 

graphend 

quit 

A  number  of  other  batch  and  . CMD  files  were  written  for 
this  thesis.  They  will  be  presented  in  Appendix  G. 
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APPENDIX  C.  FLIR  DATA 


This  appendix  presents  information  relating  to  the  FLIR 
data  used  in  the  experiments  and  simulations  of  this  thesis. 
First  a  brief  description  of  the  file  formats  will  be 
presented,  followed  by  a  discussion  of  software  used  to 
alter  these  files.  Computer  code  written  during  this  thesis 
effort  in  "C"  for  Borland's  Turbo-C  compiler  is  also 
included . 

C.l  FLIR  File  Formats 

The  FLIR  files  used  during  this  thesis  have  been  at 
AFIT  for  some  time,  and  have  been  used  for  a  number  of 
pattern  recognition  thesis  efforts.  In  general  these  files 
can  be  found  on  the  VMS  machines  throughout  the  Engineering 
school  on  various  accounts,  most  recently  Kevin  Ayer's  [24]. 
Originally  these  files  were  240  pixel  rows  by  640  pixel 
columns,  with  intensities  encoded  with  eight  bits  of  grey 
scale  in  unsigned  byte  format.  The  files  had  no  header 
information  included,  and  the  data  was  listed  row  major 
starting  from  the  top  left  (unlike  TARGA  which  started  from 
bottom  left) . 

Unsigned  byte  files  in  the  VMS  system  require  certain 
control  characters  to  be  present  along  with  the  data.  For 
that  reason  most  of  the  files  had  644  bytes  per  row  instead 
of  the  expected  640.  The  four  extra  bytes  were  at  the  end 
of  each  row. 
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These  files  may  also  have  a  different  set  of  control 
characters  which  will  appear  as  two  extra  bytes  preceding 
each  row,  resulting  in  642  bytes  per  row  (possibly  due  to 
file  transfer  in  other  than  binary  mode).  A  third  file  type 
would  have  no  control  bytes,  because  they  were  removed  using 
available  software  on  the  VMS  system.  The  net  result  was 
that  at  least  three  distinct  file  types  for  the  FLIR  data 
might  be  encountered. 

The  solution  to  the  problem  was  to  create  three 
separate  programs  for  conversion  of  these  files  to  TARGA 
format.  After  file  transfer  (using  FTP)  of  these  files  to  a 
PC,  it  was  necessary  to  determine  which  file  type  was 
present.  This  could  be  determined  by  checking  the  file 
size.  File  sizes  for  zero,  two,  and  four  control  bytes  per 
row  were  153600,  154080,  and  154560  respectively. 

C . 2  FLIR  Conversion  Software 

The  first  step  for  preparing  the  FLIR  files  for  display 
on  the  MOSLM  was  to  convert  them  to  TARGA  format.  Close 
inspection  of  the  files  showed  that  even  numbered  rows  were 
significantly  darker  than  there  odd  neighbors,  probably  due 
to  something  relating  to  interleaving  in  the  original  data 
collection  process.  This  problem  could  be  eliminated  by 
averaging  a  2X2  pixel  area  into  1  pixel. 

A  second  problem  was  that  the  MOSLM  had  two  defective 
rows.  To  avoid  these,  the  files  could  have  no  more  than  71 
pixel  rows,  so  targetless  regions  at  the  top  and  bottom  of 
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the  images  would  not  be  converted.  The  final  result  of  this 
first  conversion  step  then  was  to  convert  the  FLIR  files  to 
a  TARGA  file  that  was  71X320  pixels. 

The  three  programs  that  accomplished  this  were 
FLR2HLF . C ,  FLR2HLF2 . C ,  and  FLR2HLF3 . C  for  the  zero,  two  and 
four  control  byte  file  types  respectively.  These  programs 
were  written  so  that  it  would  be  easy  to  write  a  . CMD  file 
to  convert  a  number  of  files  successively,  leaving  the 
operator  to  pursue  other  things.  All  source  code  appears  at 
the  end  of  this  appendix. 

After  converting  the  files  to  TARGA  format,  the  next 
step  was  to  binarize  them.  Ultimately  the  files  would  need 
to  be  45X128  pixel,  binary  images  for  use  in  the  JTC  using 
the  MOSLM.  The  technique  used  to  perform  this  binarization 
was  to  binarize  on  some  threshold  that  was  a  linear  multiple 
of  the  mean  value  of  the  entire  scene  and  "AND"  this  image 
with  one  that  was  binarized  on  a  local  3X3  average.  The 
user  could  select  which  45  rows  of  the  71  available  he  would 
like  to  keep.  Four  128  column  files  overlapping  by  64 
columns  each  would  account  for  the  entire  320  pixel  columns 
of  the  reduced  FLIR  files.  The  programs  used  to  accomplish 
this  step  were  called  HLF2AND.C  and  HLF2AND2.C,  and  like  the 
FLR2HLF  programs,  they  were  made  to  be  run  with  a  .CMD  file. 
The  differences  between  HLF2AND.C  and  HLF2AND2.C  were  that 
the  four  files  created  by  HLF2AND.C  used  the  scene  average 
threshold  and  had  extensions  1,  2,  3  and  4,  while  HLF2AND2.C 
used  a  user  specified  scene  threshold  and  had  extensions  la, 
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2a,  3a,  and  4a. 

The  last  program  in  this  appendix  was  one  that  helped 
to  create  a  template  file  from  one  of  the  45X128  scene 
files.  The  program  TEMPLATE. C  allowed  the  user  to  select  a 
29X65  pixel  segment  within  a  scene  file  where  he  thought  the 
target  was  located.  By  running  the  batch  file  TEMPLATE . BAT , 
which  used  the  TESTTARG  command  file  "template.cmd"  to 
display  the  scene  and  template  file,  the  results  of  this 
segmentation  could  be  seen.  Further  background  reduction 
could  be  accomplished  using  a  hex  editor  (like  the  one 
available  with  Norton's  Utilities),  to  hand  segment  the 
template . 

The  file  "template.cmd"  is  created  each  time  TEMPLATE. C 
is  run  and  is  different  each  time.  However,  TEMPLATE . BAT  is 
presented  below,  followed  by  the  source  code  for  the  above 
mentioned  programs. 

: TEMPLATE. BAT 

:This  batch  allows  the  creation  of  a  template  file 
: from  a  binary  scene  file  for  display  on  a  MOSLM  for 
:use  in  the  JTC.  The  program  TEMPLATE. C  (a  program 
.•written  in  Turbo-C)  creates  the  file,  and  using  the 
:  the  command  file2  "template.cmd"  the  program  TES'lTARG 
: is  used  to  display  the  original  scene  file  and  the 
.•resultant  template  on  the  video  monitor. 

: prepa  rat i on 
echo  oft 
els 

SET  TARGA=247 

SET  TARGASET=T  LX-  1  OG 


CDYTURC 

template 

CD\TARGA 

testtarg  *  temp  1  ate . end 
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KI.R2HLF .  C 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CONVERSION  PROGRAM  FOR  FUR  TO  TARCA  FILE  FORMAT 
by  Capt  John  Cline 
July  31.  1981) 


/-'This  program  CONVERTS  a  user  specified  -133k  FUR  image  tile 
/•'f-22k  TARCA  to  front  by  deleting  the  first  and  last  O'  rows  and 


o  oml 

>\  i ii : 

i  i 

he  remaining  rows  and  columns  2  for 

■  1  . 

Tiiu  s 

VS! 

f  i  1  c 

*  i  s 

71>; 

;  ’’  2  0  pixels,  whereas  the  original  wa 

s  2 

t  ()v6;t() 

Pi:- 

To  make 

:  lu¬ 

se  files  useful  for  the  SIM ,  it  is 

nc*e 

o  s  s  c«  r  y 

t  o 

prop 

’r.iin 

ll 

'2  AND  .  C  or  HI.F2AND2  .  C  after  running 

l  h  i 

S  OIK'  . 

T! 

"■'■'of  the  FUR  conversion  program  assumes  NO  CONTROL  CHARACTERS 
/•/••be  present  in  the  FLIR  file.  If  the  FUR  files  contain  cent 
/•/••characters  ,  FLR2HLF2.C  or  FLR2HLF3.C  must  he-  run  i  t  is  tend . 


-•-*  i  tic  lude  "  s  t  d  i  o  .  h  " 
-  i  nc  1  ude  "  s  r  r  i  nr, .  h 
"  i  nc  1  ude  "inn  t  h  .  h" 


int  i  .  j  ,  k  .  ,  numb<  r  f  i  1  e:  : 

char  f i I ename  266  '  ,  f  i  1 ename 2 '  2  66  j  .  f i 1 1 name  3 i 2 66  i  ; 
unsip,  tied  char  hut  f  e  r  i  n  ’  72  j  ;6;*V  ; 

tins  i  i’.ned  char  hu‘  f  ernut  ’  36  ]  '  ).’n  •  ; 

uns  i  pried  ho  1  d.  r  ; 

ciiar  t  a  r  r.head  '  ;  '  \>:00'  .  '  \xO0 '  .  ’  /:•:<> 3 '  ,  '\x00'  ,  '\x00'  ,  '\> 

'\>:0  0'  ,  '\y.00'  .  '  \y.00 '  ,  '\x00',  '\\00',  '  \> 

'  \ x NO'  ,  '  \ a 7  '  .  '  \>:00 '  ,  '  \x08  ’  ,  '\> 

FILE  *f  i  lei  .  *1  i  le.’: 

void  ma ini) 

print  f ( " Enf e  r  the  number  of  files  to  process:  "); 
sci'inf  f  "*u"  ,  ^number  files); 
form  0 ;  iKnumber  files:  n+t) 


pr  i  nt  f  (  "  FI  LE  NUMHER  *d  OF  »d\n"  ,  nt],  number  file:;); 


*r,ot  input  file  name*/ 
pri nt f ( "Ent er  file  name  (no  .fir)  of 
print  f  i " in  .TARCA  di rectorv)  ,\n")  ; 

■  •  c ,  m  i  i  "  » •:  "  .  f  i  1  e  name  )  ; 

•print  Id  i  li-nare-.’,  "V\targa\\ )  1  r"  .  f 

■  p r i nt  f  >  f  i  1 ename  1  . " \  \  t  a rga\  ,  *  s  .  h  1  f  "  .  t 


FUR  file");  /*  .fir 
/''■TARCA  d  i  roe  t  o  rv 

i  1 ename )  : 
i 1 i  name  i  ; 


'  up.  n  lilt  s  and  v  r  i  t  e  heath-  r  ' 
!  i  1  <  t  opt-n i  f  i  1  ename  5 ,  "  ,;b"  )  ; 

;  VI-  i  :  <■( ;  argU-ad.  18.1  .file?); 
lilil  i  open  (fill  a. ma  2  .  "  rh"  )  ; 


vi  1  1 
rol 


00'  . 
00'  , 
00'  !  ; 


assumed*/ 

assumed* 


/*  re  a  <1  data,  invert  rows ,  average  2  for  1,  and  write  data' 
f seek ( f  i  le  1  ,  77460,  0); 
f read(buf ferin ,  1,  44800,  file!); 
for(j=0;  j < 7 0 ;  j4=2) 

I 

for (k-0 ;  k<640;  ki=2) 

( 

ho lder= (buffer  in [ j ] [ k  j  +buf  for in [ j  + 1 ] [ k ] 

4  buf fer in [ j J [ k+1 ] tbuf ferin [j+1] [ k+1 ] +2 ) /4 ; 
buf  f erout  f 3 4  - j / 2 ] [ k/2 ] =hol dor ; 


twr  i  to  (but  ferout. ,  11200,  1.  filc»2); 

f seek ( f i 1 e 1 ,  31360,  0); 

f read(buf ferin ,  1,  46080,  filel): 
tor(j*0;  j  <.  7  2  ;  j  +  ==2 ) 

t 

for (k-0 :  k<640;  1:4  =  2) 

I 

bolder* (buf fer in( j j [ k ] +buf  fer in[ j  4 1 j ( k  j 

4  buf  fer  in  [  j  ]  (  k+ 1  ]  4-buffer  in  [  j  4 1  ]  [  k4l.  ]  42  )/4  ; 
bu  f  f erout [ 3  b - j / 2 ]  [ k/2 ] =holde  r ; 

\ 

fwri te(buf ferout ,  11320,  1,  f Lle2) ; 
f c lose ( f il el )  : 
f  c.  l  o  s  e  ( f  i  1  e  2  )  : 


1  1  2 
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CONVERSION  PROGRAM  FOR  FLIR  TO  TARCA  FILE  FORMAT 
by  Cape  John  Cline 
July  31,  1989 


t  o 


/*  FLR2HLF2.C 

/* 

/* 

/-V 
/ 

/* 

/* 

/* 

/•'"This  program  CONVERTS  a  user  specified  ~I53k  FLIR  image  file 
/*~?2k  TARGA  format  by  deleting  the  first  and  last  49  rows  and 
/'-^combining  the  remaining  rows  and  columns  2  for  1.  The  res v. I :  i 
/*file  is  71x320  pixels,  whereas  the  original  was  240x440  pixels 
/*To  make  these  files  useful  tor  the  SLM,  it  is  necessary  to  run 
/''■program  HLF2AND.C  or  HLF2AND2.C  after  running  this  one.  This 
/^version  of  the  FLIR  conversion  program  assumes  2  LEADING  BYTES 
/^control  characters  will  be  present  in  the  FLIR  file.  If  the  F 
/*files  contain  0  or  4  control  characters,  FLR2HLF.C  or  FLR2HLF3 
/-■must  be  run  instead. 


th. 

ot 
LIR 
.  C 


^include  "stdio.h" 
-include  "string.h" 
-  include  "math.h" 


int  i,  j,  k,  n,  number_f iles ; 

char  f  i  lename  [  256  ]  ,  f  i  lename2  [  256  j  ,  f  i  1  ermine 3  [  256  j  ; 
unsigned  char  buffer in [ 72 ][ 642 ] ; 
unsigned  char  buf ferout [ 36 ] ( 320 ]  ; 
unsigned  holder; 

char  targheadf ]  =  {'\x00',  '\x00',  '\x03',  '\x00',  '\x00',  ' \x00 ' , 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  '\x00', 

’ \x40 ' ,  ' \x01 ' ,  ' \x47 ' ,  ' \x00 ' ,  '\x08',  '\x00'); 

FILE  *filel,  *f ile2 ; 

void  main() 

1 

print f ( "Enter  the  number  of  files  to  process:  "); 
s c a n f ( " % u " ,  &numb e  r  _  f  i  1  e  s ) ; 
for(n=0;  n<number_f iles  ;  nt-t) 

( 

printf("FILE  NUMBER  %d  OF"  %d\n"  ,  n+1 ,  number  files): 

/'•'get  input  file  name'-'/ 

pr i ntf ( "Enter  file  name  (no  .fir)  of  FLIR  file”);  /*.flr  assumed* 
printf ("in  \TARGA  directory) .\n") ;  /*TARGA  directory  assumed* 

s c  a n f ( " %  s "  ,  f i 1 e na me ) ; 

spr i nt  f ( f i 1 ename 2 , "\\t arga\\‘ s . f I r " , f i lename ) ; 
spr inti  ( f i 1 ename 3 , "\\ta rga\\%s . hi f " , f i 1 ename ) ; 

/*open  filis  and  write  header*/ 
f  i  1  e  2  -  f  ope n  (  f  i  1  e r.a me:  3  ,  "  wb  "  )  ; 
f wr i  te  ( t  a  rghead .18,1  .file?); 


filel=fopen(f i lename2 , ” rb " )  ; 


/"'read  data,  invert  rows,  average  2  for  1,  and  write  data'-/ 

fseek( filel ,  77682,  0); 

fread(buf fer in ,  1,  44940,  filel); 

for ( j  =0 ;  j <70 ;  j+=2) 

t 

for (k=2 ;  k<642 ;  k+=2) 

{ 

ho  1  de  r=  (buffer  in  [j  ]  [  k]  +buf  fer  in  [  j  -f  1  ]  [  k  ]  +buf  fer  in  [  j  j  '  k  i  1  ’ 
+buf ferin[ j+1 ] [k+l]+2)/4; 
buf ferout [ 34  - j /2 ] [ k/2 - 1 ] ^holder ; 

I 

1 

fwr i te (buf ferout ,  11200,  1,  f i 1 e  2 ) ; 

fseek( f ilel ,  31458,  0); 

fread( buffer in,  1,  46224,  filel); 

for ( j=0 ;  j <7 2 ;  j+=2) 

1 

for (k=2 ;  k<642 ;  k+=2) 


holder=  (buffer  in  [j  ]  r_  k  ]  +buf  fer  in  [  j  + 1  ]  [ k ] +buf fer i n ; j  ]  ;  k+ 1  ] 
+buf fer inf j  +1 ] [k+1 ] +2 )/4 ; 
buf  ferout [ 35  - j /2 ] [k/2 - 1 ] =holder ; 


fwrite(buf ferout ,  11520,  1,  file2): 
fclose(filel) ; 
fclose(file2) ; 


'A'  X-  a'  a'  X"  X  X"  /V  X"  X'  X'  X*  X  X  x 
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/  (tC  aji*  xV  a*’—  vU  «J  —  a U  -a V  ^1,  a ■, ^  »V  *-'^  *i^a  kl#  -*a  **#  Oa-  a’-  -.U  a 1  a  fc*^  a  V  —’ 
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/*  FLR2HLF3.C 
/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  CONVERSION  PROGRAM  FOR  FLIR  TO  TARGA  FILE  FORMAT 

/*  by  Capt  John  Cline 

/*  July  31,  1989 

/* 

/*This  program  CONVERTS  a  user  specified  ~153k  FLIR  image  file  to 
/*~22k  TARGA  format  by  deleting  the  first  and  last  49  rows  and 
/"'combining  the  remaining  rows  and  columns  2  for  1.  The  resulting 
/'"file  is  71x320  pixels,  whereas  the  original  was  240x6-40  pixels. 
/"'To  make  these  files  useful  for  the  SLM,  it  is  necessarv  to  run  the 
/^program  HLF2AND.C  or  HLF2AND2.C  after  running  this  one.  This 
/"'of  the  FLIR  conversion  program  assumes  4  CONTROL  CHARACTERS  will 
/"'be  present  at  the  end  of  each  row  in  the  FLIR  file.  If  the  FLIR 
/"files  contain  zero  or  two  control  characters,  FLR2HLF.C  or 
/"FLR2HLF2 . C  must  be  run  instead. 

“include  "stdio.h" 

^include  "string. h" 

-  include  "math.h" 


int  i,  j,  k,  n,  number_ files ; 
char  filename [ 256 ] ,  f 1 lename2 [ 256 ] 
unsigned  char  buffer in[ 72 ] [ 644 ] ; 
unsigned  crn»r  bufferout  [  36 ]  [  320]  ; 
unsigr._d  holder; 

-I.ar  targhead]  ]  =  I  '\x00'  ,  '\x00'  , 

' \x00 ' ,  ' \x00 ' , 
' \x40 ' ,  ' \x01 ' , 


f i lename3 [ 2  56 j  : 


'  \x03 ' 
' \x00 ' 
'\x47' 


' \x00 ' 
' \x00 ' 
' \x00 ' 


' \x00 ' 
' \x00 ' 
' \x08 ' 


'  \x()0 ' 
' \x00 ’ 
' \x00 ' 


FILE  *f i le 1 ,  " f i 1 e 2 ; 

void  main() 

( 

printf ( "Enter  the  number  of  files  to  process;  "); 
seal  if ( " %u" ,  &number_f i 1 es ) ; 
for(n=0;  rKnuinber  files;  n++) 

( 

printf ( "FILE  NUMBER  %d  OF  %d\n" ,  n»l,  number  f i 1 es ) ; 

/"get  input  file  name'"/ 

printf  ( "Enter  file  name  (no  .fir)  oi  FLIR  file");  /--.fir  assumed’ 
piintf("in  \TARGA  directory) . \n" ) ;  /"TARGA  directory  assumed 

sennf ( ”%s" ,  filename); 

sp r int  f ( f i 1 e name 2 , "\\ targa\\ Is . f 1 r " . f i 1 ename ) ; 
spr i nt  f ( f i 1 ename 3 , "\\targa\\» s . hi f " , f i 1 ename ) ; 


/*open  files  and  write  headc 
file?  f open ( f i 1 ename 3 , "wb" ) ; 
fwr i te ( t  a  r ghead , 18 , 1 , f i lo2 ) ; 


filel=fopen (filename 2 , " rh" )  ; 


/*read  data,  invert  rows,  average  2  for  1.  and  write  data-/ 
fseek( f ilel ,  77924,  0); 
fread(buf ferin ,  1,  45080,  filel); 
for(i=0;  j  <70 ;  j+=2) 

( 

for (k=0 ;  k<640;  kt=2) 

{ 

holder=(buf fer in[i ] [ k j  +buf fer in [ j  +1 1 [ k] +buf ferin [j ] [ k  + 1 
+bufferin[j+l] [k+lj+2)/4; 
buf f e rout [34-j/2] [ k/2 ] =ho Ider ; 

) 

1 

fwrite(buf ferout ,  11200,  1,  file2) ; 

fseek( filel ,  31556.  0); 
fread(buf ferin ,  1,  46368,  filel); 
for(j=0;  j <7 2 ;  j+=2) 

{ 

for (k--0 ;  k<640;  k+=2) 

{ 

holder=  (buf  fer  in  [  j  ]  [  k  ]  +buf  fer  in  [  j  ■+ 1  ]  [  k]  (buf  fer  in  [  j  ’  ;  k  1 
tbufferinj j+1 J [k+l]+2)/4; 
buf ferout [ 35- j/2 ] [k/2] ^holder ; 

1 


fwrite (buf ferout ,  11520,  1.  tile2) 
fclose (filel) ; 
fclose ( f  i  le2 ) ; 


1  'k 'k -k k  k k k k k  k  k k k k k k k k k k k  k k k kkkk k k k k  k k k k : 
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/*  HLF2AND.C 
/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  TO  BINARIZE  FLIR  . HLF  FILES  FOR  USE  WITH  THE  SIM 

/*  by  Capt  John  Cl ine 

/*  July  31,  1989 

/* 

/"This  program  creates  a  BINARY  version  of  TARGA  files,  that  were 
/^originally  FLIR  data.  It  should  be  run  after  running  FLR2HLF.C, 
/*FLR2HLF2 . C ,  or  FLR2HLF3.C  which  reduce  the  original  240x640  FLIR 
/*file  to  71x320  pixels.  The  program  first  binarizes  the  pixel 
/"'values  based  on  the  71X320  image's  AVERAGE  intensity.  It  also 
/"'binarizes  based  on  using  the  local  average  of  3x3  pixels.  Both 
/■'coitditicrs  must  be  satisfied  for  the  pixel  to  receive  a  ”alue  r>f 
/"'l'.  Finally,  the  program  breaks  the  file  up  into  four  smaller 
/■"45X128  files  for  use  with  the  SLM  in  the  JTC.  The  user  specifes 
/*offset  that  determines  which  of  the  71  rows  will  be  included.  The 
/"files  are  stored  in  TARGA  format  in  the  files  "filename. 1"  thru 
/"" f i lename . 4 " .  To  use  these  files  on  the  SLM,  you  must  run  the 
/"'program  DIS-HF.C.  Another  program,  HLF2AND2.C  allows  you  to 
/"•specify  a  multiplier  for  the  scene  average  threshold. 

^include  "stdio.h" 

^include  "string. h" 

-include  "math.h" 


float  threshold=0,  thrshld; 

unsigned  int  jj ,  i,  j,  k,  1,  m,  offset,  n,  number_f i les ; 
char  filename [ 256 ] ,  f i lename2 [ 256 ] ; 
unsigned  char  buffer in [ 45 ][ 320 ] ; 

unsigned  char  buf feroutl [ 45 ] [ 320 ] ,  buf ferout2 [45 ] [ 128 j ; 
char  targheadf ]  =  |'\x00',  '\x00',  '\x03',  '\x00' ,  '\x00' 

' \x00 '  ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 '  ,  ' \x00 ' 


'  \x00 '  , 
'  \x()0 '  , 


' \x80 ' ,  ' \x00 1 ,  ' \x2d ' ,  ' \x00 ' ,  '\x08',  '\x00’l 


FILE  *f ilel ; 
void  main() 


print  f  ( "Enter  a  vertical  offset  (integer  between  0  and  26):\n"); 
scanf("%u",  &offset) ; 
offset  =  32 0*o f  f s e t+ 1 8  ; 

printf ( "Enter  the  number  of  files  to  process:  "); 
scanf ( "%u" ,  &number_f i les) ; 
for(n=0;  n<number_fi les ;  n++) 

! 

printf ("FILE  NUMBER  %d  OF  %d\n" ,  ntl,  numberf i les ) ; 


/*get  file  name  */ 

printf ( "Enter  file  name  (no  . b 1 f ) ” ) ; 
printf("  (in  \TARGA  direc torv . )\n" ) ; 
scanf ( " %s " ,  f i lename ) ; 


/"'assume  .hit  * / 
/  *  assume  \  T  A  R  t  •  A  ■'  / 


sprintf (filenaine2 , "\\targa\\%s .hlf" , filename) ; 

/-read  in  data*/ 
pr intf ( "\nreading  in  data\n"); 
f ilel=fopen( f ilename2 , " rb") ; 
fseek(filel,  offset,  0); 
fread(buf fer in ,  1,  14400,  filel); 
fclose(f ilel)  ; 

/*Do  the  scene  average  threshold*/ 

printf( "calculating  scene  average  intens i ty\n" ) ; 

for(i=0;  i<45;  i++) 

( 

for(j=0;  j <3 2 0 ;  j++) 

{ 

threshold+=buf ferin[ i ] [ j ] ; 

} 

1 

threshold= threshold/ 14400 ; 

/*Now  do  the  local  3X3*/ 

printf ( "calculating  local  3x3  average  intensity\n  count  to  43\n") 
for(i=l;  i<44;  i++) 

( 

printf ( "%u\n" , i) ; 
for ( j  =1 ;  j <319 ;  j++) 

( 

thrshld=0 ; 

if (buffer in (  i  ]  [  j ]<= threshold)  buf feroutl ( i ] [ j ] =0x00 ; 
else 
( 

for ( l=i - 1 ;  l<i+2;  1++) 

( 

for(m=j-l;  m<j+2;  m++) 

( 

thrshld+=buf ferin[ 1 ] [ m ] ; 

) 

) 

i f (buf fer in [ i ] [j ]<=thrshld/9 )  buf fe rout  1 [ i j [ j  j =0x00 ; 
else  buf feroutl [ i ][ j ] =0xff ; 


) 


/-zero  edges  of  output  array*/ 
for(i=0;  i<45;  i  +  +  ) 

( 

buf feroutl [ i j [0] =0x00 ; 
bufferoutl[  i] [319 ]=0x00 ; 

1 

for(j=0;  j < 3 2 0  ;  j  +  t  ) 

I 


buf feroutl [0] [ j ]=0x00; 


bufferoutl[44] [j ] =0x00 ; 


/-write  the  four  files*/ 
pr intf ( "writing  output  files"); 
for(k=0;  k<4;  k++) 

1 

for(i=0;  i<45;  i++) 

( 

j j=k*64; 

for(j=0;  j <1 2 8 ;  j++) 

{ 

buf ferout2 [ i ] [ j ] =buf ferout 1 [ i ] [ j  j  j ; 

jj++; 


sprintf( f ilename2 , "\\targa\\%s . %u" , f i lenarae , k  f 1 ) ; 
f ilel=f ope n( filename 2 , "wb" ) ; 
fwri te ( targhead ,18,1, filel); 
f write (buf ferout 2 ,5760,1, filel); 
fclose ( filel ) ; 


'  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 


_ * _ 
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/kk'k'k'kk'k'k'k'k'k'kk'k'kk'k'k'k-k'kkk'k'k'kkkkkk'kkk'k'k'k'kk'k'k  k  'k  k  'k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  >' 

/*  HLF2AND2.C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  TO  BINARIZE  FLIR  . HLF  FILES  FOR  USE  WITH  THE  SLM 

/*  by  Capt  John  Cline 

/*  July  31,  1989 

/* 

/-This  program  creates  a  BINARY  version  of  TARGA  files,  that  were 
/-originally  FLIR  data.  It  should  be  run  after  running  FLR2HLF.C, 
/-FLR2HLF2 .  C ,  or  FI.R2HLF3.C  which  reduce  the  original  240x640  FLIR 
/-"file  to  71x320  pixels.  The  program  first  binarizes  the  pixel 
/*va]'.iPS  based  on  the  71X320  image's  AVERAGE  times  a  user  specified 
/-'multiplier.  It  also  binarizes  based  on  using  the  local  average  of 
/*3x3  pixels.  Both  conditions  must  be  satisfied  for  the  pixel  to 
/'-'receive  a  value  of  '1'.  Finally,  the  program  breaks  the  file,  up 
/-'into  four  smaller  45X128  files  for  use  with  the  SLM  in  the  JTC. 
/'-The  user  specifes  an  offset  that  determines  which  of  the  71  rows 
/-will  be  included.  The  files  are  stored  in  TARGA  format  in  the 
/-'files  "filename  .  la"  thru  "  f  i  lename  .  4a "  .  To  use  these  files  on  the 
/■-SLM,  you  must  run  the  program  DIS-HF.C.  Another  program, 
/-HLF2AND.C,  does  not  allow  a  multiplier  for  the  scene  average 
/'-threshold  and  stores  the  files  in  "filename.  1"  thru  "  f  i  lename  .  4 "  . 


“include  "stdio.h" 

» include  "string.h" 
« include  "math.h" 


float  multiplier,  threshold=0,  thrshld; 

unsigned  int  j  j  ,  i,  j,  k,  1,  m,  offset,  n,  number_f iles ; 
char  filename [ 256 ] ,  f ilename2 [ 256 ] ; 
unsigned  char  buf ferin[45 ] [ 320]  ; 

unsigned  char  buf ferout 1 [ 45 ] [ 320 ] ,  buf feroutZ [ 45 ] [ 1 28 ] ; 

char  targhead] j  =  {'\x00',  ’\x00' ,  '\x03',  '\x00',  '\x00',  '\x00', 

' \x00 ' ,  ’ \x00 ' ,  ’ \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  '\x00', 

' \x80 '  ,  ' \x00 ' ,  '\x2d' ,  ' \x00 ' ,  '\x08',  '\x00'!; 

FILE  *filel; 
void  main() 

I 

pr intf ( "Enter  a  vertical  offset  (integer  between  0  and  26):\n"); 
scnnf("%u",  &offset); 
of  fset=320-'off set.  + 18  ; 

pr intf (" ENTER  threshold  multiplier  (mean=l;"); 
printf("  1.5  times  mean-1.5  rtc. ) :\n") ; 
scanf  ( "%f "  ,  fieinultip  1  ler )  ; 

pr intf ( "Enter  the  number  of  files  to  process:  "); 
scanf("%u".  &number  files); 
f.or(n=0;  n<number_f  i  les  ;  nt+) 

I 

printf("F!LE  NUMBER  %d  OF  %d\n" ,  n+1 ,  number _f i los ) ; 
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/*get  file  name  */ 

pr intf (" Enter  file  name  (no  .hlf)"); 
printf("  (in  \TARGA  directory . )\n" ) ; 
scanf("%s",  filename); 

spr intf ( f ilename2 , "\\targa\\%s .hlf" , filename) ; 

/*read  in  data*/ 
pr intf ( "\nreading  in  data\n"); 
filel=fopen( filename 2 , "rb") ; 
fseek(filel,  offset,  0); 
fread(buf ferin ,  1,  14400,  filel); 
fclose (filel) ; 

/*Do  the  scene  average  threshold*/ 
pr intf ( "calculat ing  scene  average  intens i ty\n" ) ; 
for(i=0;  i<45;  i++) 

( 

for(j=0;  j <320 ;  j++) 

{ 

threshold+=buf ferin [ i] [ j ] ; 

} 

) 

threshold=multipl ier* threshold/ 144 00 ; 

/*Now  do  the  local  3X3*/ 
printf ("calculating  local  3x3  average  intensity\n  count  to  43\n"); 
for(i=l;  i<44 ;  i++) 
l 

pr int f ( " %u\n" , i ) ; 
for ( j  =1 ;  j < 3 1 9  ;  j  +  f) 

{ 

thrshld=0 ; 

if (buffer in [ i ] [ j ] <= threshold)  buf fe routl [ i j [ j ] =0x00 ; 
else 


/'■'assume-  .hlf*/ 
/*assume  \TARGA*/ 


for(l=i-l;  l<i+2;  1++) 

{ 

for(m=j-l;  m<j+2;  m++) 

( 

thrshld+=bu  f  fer  in  [  1  ]  [  in  ]  ; 


if(bufferin[i] [ j ]<=thrshld/9 )  buf fe rout  1 f  i  ]  [  j  ] =0x00 ; 
else  buf feroutl [ i ] [ j ]=0xff ; 


/*zero  edges  of  outpul  array*/ 
for ( i =0 ;  i<45 ;  i++) 

( 

buf  fe  rout  1 [ i J  [ 0 ] =0x00 ; 
buf fe routl [ i ] [319] -0x00; 
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) 

for(j=0;  j <320 ;  j++) 

{ 

bufferoutl[0] [j ] =0x00 ; 
bufferoutl[44] [j] =0x00 ; 

) 

/*write  the  four  files*/ 
printf ( "writing  output  files"); 
for(k=0;  k<4 ;  k++) 

{ 

for(i=0;  i<45;  i++) 

( 

j j=k*64 ; 

for(j=0;  j <1 2 8 ;  j++) 

{ 

bufferout2 [ i ] [ j ]=bufferoutl [ i] [ j j ] ; 

jj++; 

) 

) 

sprintf ( file name  2 , "\\targa\\%s . %ua" , filename , k  +  1 ) ; 
f ilel=fopen( f ilename2 , "wb" ) ; 
fwr ite ( targhead , 18 , 1 , filel) ; 
fwrite(bufferout2,5760, 1, filel) ; 
fclose( filel) ; 

) 

1 
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/*  TEMPLATE. C  •/ 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  FOR  CREATING  TEMP1ATES  FOR  USE  IN  THE  JTC 

/*  by  Capt  John  Cline 

/*  ”  July  31,  1989  */ 

f*  */ 

/*This  program  will  create  a  ~7k  45x128  pixel  TARGA  file  using  29x65  */ 
/'-^pixels  from  a  user  specified  binary  FLIR  file  in  TARGA  format 
/*created  by  the  program  HLF2AND.C  or  HLF2AND2.C.  The  user  selects 
/"the  coordinates  of  the  center  pixel  in  the  original  file,  and  the 
/*29x65  pixels  will  be  written  onto  a  black  background  centered  at 
/■"■pixel  location  (64,  14).  The  template  file  can  be  displayed  on 
/*SLM  using  the  program  DIS-HF  which  is  part  of  a  joint  transform 
/■"■correlator.  The  program  also  creates  a  .  CMD  file  for  use  with 
/■"the  TARGA  program  TF.STTARG  which  allows  the  template  and  scene 
/*file  to  be  displayed  on  the  video  monitor  after  template  creation.  */ 
/■"'The  batch  file  TEMPLATE.BAT  will  perform  all  necessarrv  steps  */ 

/“except  some  further  segmentation  of  the  template  that  must  be  done  ••/ 
/"'use  a  hex  editor  like  the  one  available  with  Norton's  Utilities.  ■••'/ 


-A.  a.  a-  a.  a- 


.  A.  A.  A-  A.  A-  A.  A-  -A-  A.  -A-  A-  A  A  -A-  A.  A  A-  A 


-include  "stdio.h" 
-include  "string. h" 
-include  "math.h" 


unsigned  int  i,  j,  ii,  jj,  xc .  yc ; 
char  filename [ 256 ] ,  filename'!  [  256  ] 
unsigned  char  buf ferin [45 ] [ 128 ] ; 
unsigned  char  bufferout [45] [ 128] ; 
char  targhead[]  =  ('\x0 O',  '\x00', 

' \x00 ' ,  ' \x00 ' , 
' \x80 ' ,  ' \x00 ' , 


filename 3 [256 ] ; 


' \x03 ' ,  ' \x00 ' ,  ' \x00 ' ,  '\x00'. 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' .  ' \x00 ’ . 

'  \x2d '  ,  '  \xU() '  ,  '  \ x 08'  ,  '  \x00  '  ) 


FILE  *f ilel ,  '“'file/; 


void  main() 

( 

pr int f (" Enter  file  name  and  .ext  of  AND  file"); 

printf  (  "  (in  \TARGA  directory)  .  \n"  )  ;  /'“assume  \TARG:V-. 

scanf ( " %  s "  ,  f i 1 ename ) ; 

spr intf ( f i lename2 , "\\ ta rga\\ *  s " , f i 1 ename ) ; 

printf ( "reading  in  data\nM); 

filel  =  fopen(fi  1  ename  2  ,  11  rb"  )  ; 

fseek( filel ,18,0); 

fread(buf for  in  ,  1,  5760,  filel); 

f  e  1  o  s  e  (  f  i  1  e  1 )  ; 

/■•’'template  will  go  in  TARGA  directory  with  .  t  irp  ext  i -ns  i  on  '  . 
print  f  ( "Enter  file  name  (no  .  t.mp)"); 

printf("  of  template  file  (to  \TARGA  d  i  root  ory )  .  \,n"  7  ; 
scanf ( " %s "  ,  f i 1 ename ) ; 


sprint'f  (f  ilen.iim-1 ,  "\\t  a  r  p,a\\  *  s  .  r.inp"  ,  1  1  lenniiio  )  ; 
f  i  Ie2  =  ft>pen  (  f  i  1  enamel  ,  "  wb"  )  ; 

/ *  c  r  e  ate  .  c  in  d  file1  / 

f  i  ie  1  *--f  open  (  "\  \  t  a  r;;a\\  t  cinp  la  La  .  raid  "  ,  "  w"  )  ; 

fprintf  (  f  i  1  e  1  ,  "  1  iv«\ne rase\nO\nO\nO\nd  i.«\npo  t  j>  i  e\n  :  s  "  ,  f  i  It  n..i:  e 2 )  : 
f pr i nt  f  (  f  i  lei,  "\nO\nO\n  -  l\nr,e  tp  ic\n  »  s  .  t  n-pX n0\n5')\n  -  1  \  n"  ,  f  i  1  vrame  ; 
fprintf  (  f  i  1  e  1 ,  "  p,raphend\nqu  i  t\n"  )  ; 
f  c 1 ose ( f i lei)  ; 

/-’create  template  file,*/ 

printf  ("Enter  rente- r  coordinates  xc  between  12  and  94  i  ne  1  i  -.a  n " 

printf("and  vc  between  14  and  30  i nc 1  ns i ve : \n" ) : 

printf ( "xc : " ) ; 

scanf  (  "  *-u"  ,  &xc); 

print f ( "vc : " )  ; 

scanf  ("Hi",  dvc )  ; 

i  i=0  ; 

for(  i=yc- 1-4  ;  i<yc+15;  iM) 

1 

jj-32; 

for  ( j  -xc  -  32  ;  j<xct33;  j  t ■») 

( 

buff  trout ’ i i ; j  j j ] -bu f fer  in [ i i [jit 

jj  *■*  : 

) 

i  1  t  t  ; 

1 

fwri  t<  (la  r  .die  ad  ,  I  f  ,  1  ,  L  1 1  e  2  )  : 

twr  i  t  r  (Imf  f  e  rout ,  >  ‘‘-d  .  I,  filo2); 

f  ('  lore  (  fill- 2  )  ; 


APPENDIX  D.  SPIRICON  FRAMEGPABBER 


This  appendix  presents  information  relating  to  the 
Spiricon  framegrabber  system.  It  is  included  for  two 
reasons.  First,  this  system  can  provide  3D  plotting  of  its 
files  that  enhance  documentation.  Second,  this  camera  and 
framegrabber  system  may  be  used  in  future  related  research. 
The  manual  can  provide  more  information  concerning  this 
system  if  it  is  needed  [36]. 

A  brief  discussion  of  Word  Perfect  5.0  import  of  these 
3D  plots  and  description  of  the  file  formats  will  be 
presented,  followed  by  a  discussion  of  software  used  to 
convert  TARGA  file  formats  to  Spiricon  and  vice  versa. 
Computer  code  written  during  this  thesis  effort  in  "C"  for 
Borland's  Turbo-C  compiler  is  also  included. 

D.l  Documentation  in  Word  Perfect  5.0 

The  following  discussion  assumes  knowledge  of  Word 
Perfect  5.0's  graphic  program  GRAB.COM.  3D  plots  using  the 
Spiricon  system  can  be  imported  into  Word  Perfect  5.0  if  a 
few  steps  are  followed.  GRAB.COM  must  be  run  first,  before 
executing  the  Spiricon  software.  GRAB.COM,  which  can 
convert  the  computer  monitor  display  into  a  graphic  file 
"grabX.wpg"  for  later  import  into  Word  Perfect  5.0,  is 
normally  easy  to  use.  However,  when  it  runs  along  with  the 
Spiricon  software  some  strange  things  happen. 

The  first  problem  encountered  is  that  the  outline  box 
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is  not  visible,  but  the  correct  region  is  usually  captured 
if  no  cursor  buttons  are  pressed.  The  second  problem  is 
that  after  the  file  is  created,  the  computer  locks  up  and 
must  be  reset  by  powering  down  and  back  up  again  (Ctrl-Alt- 
Del  won't  work) .  This  may  be  too  tedious  if  a  number  of 
plots  are  necessary,  so  cut  and  paste  may  be  preferred  using 
Spiricon's  built  in  print  function. 

D . 2  Spiricon  File  Formats 

Spiricon  files  are  512X512  arrays  of  eight  bit  grey 
scale  pixels  in  unsigned  byte  format.  The  only  differences, 
other  than  the  size  of  the  file  (512X512  versus  400X512), 
between  Spiricon  and  TARGA  files  are  the  necessary  header 
information,  and  that  the  TARGA  files  are  row  major  starting 
from  the  lower  left,  while  the  Spiricon  files  are  row  major 
starting  from  the  upper  left. 

Instead  of  the  18  byte  header  used  by  TARGA  files, 
Spiricon  files  have  only  two  bytes  preceding  the  image  data, 
hex  39  and  hex  30.  Spiricon  files  also  have  906  bytes  of 
information  at  the  end  of  each  file  relating  to  equipment 
configuration.  So  the  total  length  of  the  Spiricon  file  is 
263052  bytes  [36:79],  versus  204818  bytes  for  a  full  screen 
(400X512)  TARGA  file. 

D . 3  Spiricon  Conversion  Software 

The  first  of  three  conversion  programs,  TAR2SPIR . C , 
converts  a  400X512  TARGA  file  to  a  512X512  Spiricon  file  by 
adding  56  rows  of  zeros  both  above  and  below  the  image  data. 
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The  906  bytes  of  information  typically  at  the  end  of  each 
Spiricon  file  is  read  from  the  file  "spir.fig"  that  is  used 
by  the  Spiricon  system  software,  and  can  be  found  on  the 
distribution  diskettes  [37]. 

The  second  program,  SPIR2TAR.C,  converts  the  Spiricon 
file  to  a  400X512  file  by  deleting  the  first  and  last  56 
rows.  A  third  program,  SPI2TAR. C ,  creates  a  512X512  TARGA 
file  which  can  not  be  fully  viewed  on  the  TARGA  video 
monitor.  However,  this  does  allow  Spiricon  files  to  be 
converted  to  Encapsulated  PostScript  files  for  use  with 
Latex  (see  Appendix  B) . 
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/ kkkkkkkkkkkkkkkkkkkkkkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  / 

/*  TAR2SPIR.C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY  */ 

/*  CONVERSION  PROGRAM  FOR  TARGA  TO  SPIRICON  FILE  FORMAT  */ 

/*  by  Capt  John  Cline  */ 

/*  July  11,  1989  */ 

/*  */ 

/*This  program  CONVERTS  a  user  specified  TARGA  file  to  Spiricon  file  */ 
/*format  by  adding  56  blank  rows  above  and  below  the  image  data.  */ 

/*The  file  "spir.tig  must  be  present  to  provide  header  information  */ 
/*for  the  Spiricon  file.  Since  Spiricon' s  files  start  from  the  top  */ 
/"'TARGA' s  start  from  the  bottom,  inversion  is  necessary.  */ 

/ kkkkkkkkkkkkkkkkkkkkkkkkk k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k / 


^include  "stdio.h" 
winclude  "string. h" 
^include  "math.h" 


int  i ,  j ,  k; 

char  filename [ 256 ] ,  f i lename2 [ 256 j ,  holder[512); 
char  buf ferit [ 100 ] [ 512  ]  ; 
char  spirhead[ 2J  =  { '\x39' , '\x30'  }  ; 
char  spirtail [ 906 ]  ; 

FILE  *f ilel ,  *file2,  *file3; 

void  main() 

{ 

/*get  file  names  and  open  files'"/ 

printf ( "Enter  complete  path  and  file  name  of  TARGA  file.\n"); 
scanf("%s",  filename); 
filel=fopen( filename , "rb" ) ; 

printf ( "Enter  complete  path  and  file  name  of  SPIRICON  file.\n"); 
scanf("%s",  filename2); 
f i le2=f open ( f i lename2 , "wb" ) ; 

/*write  2  header  bytes  and  56  blank  rows'"/ 
fwr i te ( sp irhead ,  sizeof (spirhead) ,  1,  file2); 
fwrite (buf ferit ,  28672,  1,  file2); 

/"'read  TARGA,  invert  rows  and  write  Spiricon*/ 
printf  (  "Count  to  4\ti"); 
for(i=0;  \</>\  i++) 


printf ( "%d\n" , i  +  1 )  ; 
fseek( fi lei ,  18+51200*( 3 - i ) ,  0); 
fread(bufferit ,  1,  51200,  filel) ; 
for(j=0;  j<50;  jit) 

I 

for(k=0;  k<512;  k+t) 

I 

iiol  der  [  k  ]  -buf  for  i  t.  f  j  J  j  k  j  ; 
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bufferit[j  ]  [k]=bu£ferit  [99- j  ]  ; 

buffer it [ 99 -j ] [k]=holder [k] ; 


} 

fwrite (bufferit ,  sizeof (bufferit) ,  1,  file2); 

) 

fc lose ( f ile 1 )  ; 

/*write  56  blank  rows*/ 
for(i=0;  i<512;  i++) 

{ 

for(j=0;  j<56;  j++) 

( 

bufferit[j ] [i]=OxOO; 

} 


fwrite (bufferit ,  28672,  1,  file2); 


/*wri te  configuration  file  to  Spiricon 
f ile 3=f open ( " spir . f ig" , " rb" ) ; 
f read( spir tail ,  1,  906,  file3); 
fclose(file3)  ; 

fwrite (spirtail ,  sizeof (spirtail) ,  1, 
fclose ( f ile2)  ; 

) 

j'kkk  k  'k  k  'k  k  k  kkkkkk  k  k  k  k  k  k  k  k  kkkkkkkk  k  k  k  k  kkkkk- 


file*/ 


f  i le2 )  ; 


k k k k k kkk 


k  k  k  k  k  k  k  k  k  k  k  k  k  J 
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/*  SPIR2TAR.C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNO1  OGY  */ 

/*  CONVERSION  PROGRAM  FOR  SPIRICON  TO  TARGA  FILE  FORMAT  */ 

/*  by  Capt  John  Cline  */ 

/*  July  31,  1989  */ 

/*  */ 

/*This  program  CONVERTS  a  user  specified  Spiricon  file  to  TARGA  file  */ 
,/*format  by  deleting  56  rows  on  the  top  and  bottom  of  the  image  data.*/ 
/*An  18  byte  header  is  added  to  the  TARGA  file.  Since  Spiricon' s  */ 
/*files  start  from  the  top  and  TARGA' a  start  from  the  bottom,  */ 

/*inversion  is  necessary.  The  program  SPI2TAR.C  will  create  a  */ 

/*512X512  TARGA  file  (no  deleted  lines) ,  however  it  can  not  be  viewed*/ 

/*in  its  entirity  on  the  video  monitor.  */ 


^^'kic^ic^'k'k'k'k'k'k'k'k-k‘k'k'k'k'k'k'k'k'k'k'k''k'k'k'k'k-k'k'k''k'k'k'k'k'k'k'k  A -A' ~k ~k ~A- 'k x  k -k  -k i 


*  *  *  *  *  *  *  *  *  *  *  / 


#include  "stdio.h" 
#include  "string. h" 
^include  "math.h" 


int  i ,  j ,  k; 

char  filename [ 256 ] ,  f i lename2 f 2 56 ] ,  holder[512]; 
char  buffer it ( 100 ][ 512 ] ; 

char  targhead(]  =  ('\x00',  '\x00',  '\x03',  '\x00',  '\x00',  '\x00', 

' \x00 ' ,  ' \x00 '  ,  ' \x00 ' ,  ' \x00 ' ,  ’ \x00 '  ,  '\x00', 

' \x00 ' ,  ' \x02 ' ,  ' \x90 ' ,  ' \x01 ' ,  ' \x08 ' ,  '\x00'l; 

FILE  *f ilel ,  *file2; 

void  main() 

{ 

/*get  filenames  and  open  files*/ 

printf (" Enter  complete  path  and  file  name  of  SPIRICON  file.\n"); 
scanf("Ts",  filename); 
filel=fopen( filename , "rh") ; 

printf ("Enter  complete  path  and  file  name  of  TARGA  file.\n"); 
scanf ("Is" ,  filename2) ; 
f ile 2= fopen( filename 2 , "wb" ) ; 

/*write  header*/ 

fwr i te ( targhead ,  sizeof (targhead) ,  1,  file2); 

/*read  Spiricon,  invert  files  and  write  TARGA*/ 
pr intf ( "Count  to  4\n" ) ; 
for(i=0;  i<4 ;  i++) 

( 

pr int f ( " %d\n" , i  +  1 )  ; 

fseek( f ilel ,  28674+ ( 3 - i ) *51200 ,  0); 

fread(buf ferit ,  1,  51200,  filel); 

for(j=0;  j  <  5  0 ;  j+  +  ) 
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for (k=0 ;  k<512;  k++) 

{ 

holder [k]=buf ferit [j ] [k] ; 
bufferit[j ] [k] =buf ferit [ 99 - j ] [k] ; 
buf f erit [ 99  - j ] [k] =holder [ k ] ; 

} 

1 

fwrite (buf ferit ,  sizeof (buf ferit) ,  1,  file2) 

) 

fclose(f ilel) ; 
fclose (f ile2) ; 
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/*  SPI2TAR . C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY  */ 

/*  CONVERSION  PROGRAM  FOR  SPIRICON  TO  TARGA  FILE  FORMAT  */ 

/*  by  Capt  John  Cline  */ 

/*  July  31,  1989  */ 

/*  */ 
/*This  program  CONVERTS  a  user  specified  Spiricon  file  to  TARGA  file  */ 
/^format  without  deleting  any  rows.  The  resultant  TARGA  file  is  */ 

/*512X512  pixels  112  rows  too  large  for  display  of  the  entire  image  */ 
/*on  the  TARGA  video  monitor.  However,  this  step  allows  the  Spiricon*/ 
/*files  to  be  converted  to  Encapsulated  PostScript  using  the  TARGA  */ 
/*program  TRUEPS.EXE.  The  resultant  PostScript  file  must  have  its  */ 
/*last  two  command  lines  removed  using  an  ASCII  editor  to  be  imported*/ 
/*into  Latex.  An  18  byte  header  is  added  to  the  TARGA  file;  and  */ 
/*since  Spiricon' s  files  start  from  the  top  and  TARGA' s  start  from  */ 
/*the  bottom,  inversion  is  necessary.  The  program  SPIR2TAR.C  will  */ 
/"^create  a  400X512  TARGA  file  (with  deleted  lines)  that  can  be  viewed*/ 
/*in  its  entirity  on  the  video  monitor.  */ 

/'k'k'k'k'k'k'k-k-k'k'kkk'k'k  'k  'k  'k'k'k'k  k  'k  'k  k  k  k  k  k  k  k  k  k  'k  'k  'k  'k  'k  'k  ~k  'k  k  'k  'k  -k  'k  ~X~  'k  'k  'k  'k  'k  'k  ~k  'k  *  'A'  'A'  '-V  v’:  "V  x  'k  'k  ~k  / 


^include  "stdio.h" 
^include  "string. h" 
winclude  "math.h" 


int  i ,  j ,  k ; 

char  filename [ 256 ] ,  f ilename2 [ 256 ] ,  holder[512]; 
char  buf ferit [ 64 ] [ 512 ] ; 

char  targhead[]  -  ('\x00',  '\x00',  '\x03',  '\x00', 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' , 

' \x00 '  ,  ' \x02 ' ,  ' \x00 '  ,  ' \x02 ' , 

FILE  * f i 1 e 1 ,  *file2; 

void  main() 

( 

/*get  filenames  and  open  files*/ 
printf( "Enter  complete  path  and  file  name  of  SPIRICON  file.\n"); 
scanf("%s",  filename); 
filel=fopen(f i lename , " rb" ) ; 

printf( "Enter  complete  path  and  file  name  of  TARGA  file.\n"); 
scanf("%s",  filename2) ; 
file2=fopen(f i lename 2 , "wb" ) ; 

/*write  header*/ 

fwr i te ( targhead ,  s i zeo f ( targhead) ,  1,  file2); 

/*read  Spiricon,  invert  files  and  write  TARGA*/ 
printf( "Count  to  8\n"); 
for(i=0;  i<8 ;  i++) 

( 

pr int  f ( "%d\n" , i  +  1 ) ; 


' \x00 ' ,  ' \x00 ' , 

'  \x00 '  ,  ' \x00 '  , 

' \x08  '  ,  ' \x00 ' ) ; 
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fseek(f ilel ,  2+ ( 7 - i ) *32 768 ,  0); 
fread(buf ferit ,  1,  32768,  filel) ; 

for ( j=0 ;  j <32 ;  j++) 

( 

for(k=0;  k<512;  k++) 

{ 

holder[k]=bufferit[ j ] [k] ; 
bufferitfj ] [ k] =buf ferit [ 63 -j ] [k] ; 
bufferit[63-j ] [ k] =holder [k ]  ; 

} 

} 

fwrite (buf ferit ,  sizeof (bufferit) ,  1,  file2) ; 

) 

fclose(filel) ; 
fclose(file2) ; 

) 
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APPENDIX  E.  IMAGING  TECHNOLOGY  SYSTEM 

This  appendix  presents  information  relating  to  the 
Imaging  Technology  image  processing  system.  This  system  was 
made  available  by  ASD\ENAML,  and  was  used  to  perform  the 
simulations  of  Chapter  III.  The  equipment  can  perform  a 
number  of  functions  including  2D  Fourier  transforming  and 
image  rotation,  which  may  be  useful  for  future  attempts  at 
performing  rotation  invariant  pattern  recognition. 

Additional  information  can  be  acquired  from  the  system 
manuals  [38]  or  through  personnel  at  ASD\ENAML  [39]. 

A  description  of  the  file  formats  for  the  Imaging 
Technology  system  is  presented,  followed  by  a  discussion  of 
the  software  used  for  file  conversion.  Computer  code 
written  during  this  thesis  effort  in  "C"  for  Borland's 
Turbo-C  compiler  is  also  included. 

E.l  Imaging  Technology  Fiie  Format 

All  Imaging  Technology  files  have  a  . img  extension  in 
their  DOS  file  name.  The  largest  Imaging  Technology  files 
are  480X512  arrays  of  eight  bit  grey  scale  pixels  in 
unsigned  byte  format.  The  only  differences,  other  than  the 
maximum  size  of  the  file  (480X512  versus  400X512),  between 
Imaging  Technology  and  TARGA  files  are  the  necessary  header 
information,  and  that  the  TARGA  files  are  row  major  starting 
from  the  lower  left,  while  the  Imaging  Technology  files  are 
row  major  starting  from  the  upper  left. 
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Instead  of  the  18  byte  header  used  by  TARGA  files, 
Imaging  Technology  files  can  have  a  variable  header  size, 
depending  upon  the  length  of  the  comment  field  inside  the 
header.  The  header  specifications  for  Imaging  Technology 
files  are  listed  in  the  system  manuals  [38:01]  and  are 


reproduced 

below . 

Bytes 

Contents 

0-1 

Characters  IM  indicate  this  is 

an  image  file 

2-3 

Comment  length 

4-5 

Width  of  the  image  in  pixels 

6-7 

Height  of  the  image  in  lines 

8-9 

Coordinates  of  original  X-axis 

position 

10-11 

Coordinates  of  original  Y-axis 

position 

12-13 

File  type  flag  0=8  bit 

1  =  compressed 
4  =  16  bit 

14-63 

Reserved 

64  -n 

Comment  area  -  variable  in  length;  maximum 
255  bytes 

rest 

Data  area 

E.2  Imaging  Technology  Conversion  Software 

The  first  of  three  conversion  programs,  TAR2IMG.C, 
converts  any  size  TARGA  file  to  a  Imaging  Technology  file  by 
changing  the  header  and  inverting  the  data  to  read  from  top 
down  instead  of  from  bottom  up. 

The  second  program,  IMG2TAR.C,  converts  Imaging 
Technology  files  of  any  size  to  TARGA  file  format  by 
reversing  the  process  of  TAR2IMG.C.  This  may  result  in  a 
TARGA  file  that  is  too  large  to  be  fully  viewed  on  the  TARGA 
video  monitor.  However,  this  does  allow  Imaging  Technology 
files  to  be  converted  to  Encapsulated  PostScript  files  for 
use  with  Latex  (see  Appendix  B) . 
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The  third  program,  ING2TAR2.C,  converts  a  480X512 
Imaging  Technology  file  to  a  400X512  TARGA  file  by  deleting 
the  last  80  lines. 


136 


/' 

/-; 

/' 

/' 

/'• 

/■ 

/' 

/' 

/' 

/'; 

/* 

/': 

/* 


•k'k'k-k'k'k'k'k'k'k-k'k' 

TAR2IMG . C 


\  A  A  X"  A  a'  a'  A*  A  X  X  X  XT  A  X  a' 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CONVERSION  PROGRAM  FOR  TARGA  TO  IMAGING  TECHNOLOGY  FILE  r > )RMAT 

by  Capt  John  Cline 
September  30,  1989 

This  program  CONVERTS  a  user  specified  TARGA  file  to  Imaging 
Technology  file  format.  A  64  byte  header  is  added  to  the  Imagitu 
Technology  file;  and  since  TARGA  files  start  from  the  bottom  and 
Imaging  Technology  files  start  from  the  top,  inversion  is 
necessary. 


^include  "stdio.h" 
^include  "string. h 


long  int  seek_length; 
int  i,  columns,  rows; 
unsigned  char  f ilename ( 256 ] 
char  imtechhead [ 64 ] = { 


f ilename2 [ 256 ] ,  buffer[512],  targhead[I8 


' \x49 ' 

' \x4d ' , ' \x00 ' , '\x00' 

' \x00 ’ 

, ' \x02 

'  \x90 ' 

' \x01 ' , ' \x00 ' , ' \x00 ' 

' \x00 ' 

,  '  \x00 

'  \x00 ' 

' \x00 ' , ' \xd7 ' , ' \x5 1 ' 

' \x72 ' 

,  ' \xf 9 

’  \xld ' 

' \x03 ' , ' \xc4 ' , ' \xld' 

'  \x06 ' 

.  ’  \x00 

'  \x20  ’  , 

' \x00 ' , ' \xlb ' , ' \x00 ' 

' \x89 ' 

.  '  \x55 

' \x5d '  , 

' \x02 ' , ' \xc4 ' , ' \xld ' 

’ \x9a ’ 

,  '  \xfC) 

'  \x0a '  , 

' \x0 1 ' . ' \xS2 ' , ' \x00 ' 

' \xfd ' 

,  '  \x  f  a 

'  \x9e '  , 

'  \xf9 '  ,  '  \x33  '  ,  '  \x()0 ' 

' \x5d ' 

.  '  \x2c 

'  \x96  '  , 

' \xf 9 ' , ' \x82 ' , ' \x00 ' 

' \xfd ' 

,  '  \xf  a 

'  \x9e '  , 

’ \xf 9 ' . ' \x40 ' , ’ \x00 ' 

'  \x()7  ' 

,  '  \x59 

'  \x82 '  , 

' \x00 ' , ' \x0f ' , ' \x00 ' 

; 

FILE  *filel,  *f ile2 ; 


void  main() 

I 

,/*get  filenames  and  open  files*/ 

printf  ( "Enter  complete  path  and  file  name  of  TARGA  filc-.Xn"'); 
scanf("%s",  filename); 
f ilel=fopen( filename , "rb” ) ; 

printf ( "Enter  complete  path  and  file  name  (and  . img)  of"i; 
printf ("  IMAGING  TECHNOLOGY  filo.\n"); 
scanf ( "%s" ,  filename2); 
f ile2=fopen( f i lename2 , "wh" ) ; 

/*get  TARGA  input  file  specs  and  write  Imaging  Technologv  header* 
f read( targhead ,  1,  18,  file!); 

col umns = ( in t ) targhead [12] t 256* ( int  ) t  a rghead [13;  ; 
rows=( int) targhead [ 14 ] +256*( int ) targhead] 15] ; 
imteclihead [ 4  j=targhoad[  12  ]  ; 
i  mtechhead] 5 1 -targhead [ 13 ]  ; 
imtechhead [ 6 ] -targhead [ 14 j ; 


irntechhead  [  7  ]  =targhead  [15]; 
fwrite ( irntechhead , 1 , 64 , t i le2 ) ; 

/"'read  in  TARGA  and  write  Imaging  Technology  oih-  row 
for ( i  =  rows - 1 ;  i>=0;  i--) 

I 

seeklength  =  (long)i  *  ( long) columns  t  18; 
fseek(filel,  seek_lengt.h,  0); 
fread(buf fer ,  1,  columns,  filel); 
fwr i te (buf f er ,  columns,  J,  file2); 

) 

fclose(filel)  ; 
fclose(file2) ; 
pr intf ( "done  \n" ) ; 


I MG 2 TAR. C 


/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  CONVERSION  PROGRAM  FOR  IMAGING  TECHNOLOGY  To  TAROA  FILE 
/'-'  by  Capt  John  Cliiu- 

S  e  p  t  e  mb or  30,  1 y 8  h 


./“This  program  CONVERTS  a  user  specified  Imaging  Technology  £;!<• 
/-'-'TARGA  file  forniat  without  deleting  anv  rows.  The  resultant  TAR 
/'-file  is  a  maximum  of  480X512  pixels  80  rows  *"oo  large  for  di-pi 
/-'"of  the  entire  image  on  the  TARGA  video  monitor.  However,  this 
/■''-'allows  the  Imaging  Technology  Files  to  be  converted  to  Encapsul 
/'-'PostScript  using  the  TARGA  program  TRUEPS.EXE.  The  resultant 
/'•- PostScript  file  must  have  its  last  two  command  lines  removed  us 
/'-an  ASCII  editor  to  be  imported  into  Latex.  An  18  byte  header  i 
/-’■'added  to  the  TARGA  file;  and  since  Imaging  Technologv  files  sta 
/'•'■•from  the  top  and  TARGA  ’  s  start  from  the  bottom,  inversion  is; 
/-'■'necessary.  The  program  1MG2TAR? .  C  will  create  a  400X512  TARGA 
/■--from  a  480X512  Imaging  Technology  file  by  deleting  the  last  80 
/"'■'lines,  so  that  the  resultant  TARGA  file  can  be  viewed  in  its 
/••entirity  on  the  video  monitor. 


-include  "stdio.h" 
=  i nc 1 ude  " s  t  r i ng . h 


i  n  t  l  ; 

uns i gned  cha  r  ho  1 de  r ' 2 ■  ; 

char  filename [ 25rJ  ,  f  i  lename2 ; 256 !  ,  buffer ' 512] ; 


long  int  columns, 
char  tnrgheadi  ;  = 


rows , 

t  r  \  , 

'  V 


comment  lengt 


seek  'length; 


x00 '  , 

'\x()0'  , 

'\x03' , 

' \xOO ' , 

\xO(G  , 

'  x<l  o' 

>;()()'  , 

'  \x0()  '  , 

'  \x()0 '  . 

'  \\00  '  . 

\x00 ' . 

’  \x0i  I ' 

xO0'  . 

'  \x02  '  . 

'  \xc)0 '  , 

'\xOl ' , 

\xOS ' , 

' \x0o ' 

FILE  -'■  f  i  1  e  1  ,  f  i  1  <-  2  ; 


void  main!) 

1 

/•'•'get  f i  1  en, tines  and  open--/ 
pr i nt f ( " Ent e r  complete  path 
p r i nt  £ ( "  I  MAG  I NG  TECHNOLOGY 
sc  an  f  (  "  *  s  "  .  f  i  I  enairc  )  ; 
til  e  1  f  open  ( f  i  1  ennme  .  "  rh  "  .!  ; 
p r i nt f ( ” En t t  r  complete  path 
sc, inf (">s".  {  i I enamel’  i  ; 

i  i  1  e  /  ---  f  open  (  f  i  1  et'.ame '?  .  "  wb "  ) 


and  file  name  o f " )  ; 
fi 1 e . \n" ) ; 

and  fiK'  name  of  TARGA  file.'n"i; 


-get  IMAGING  TECHNOLOGY'  input  file  specs  and  write  TARGA  head 
f  see  k  (til  e  I  ,  ,  0  )  ; 

f rend ( ho  1 de r ,  1,  2,  f  i  1  e 1  >  ; 

comment  1  ength  - 1  v.  1  de  r  [  0  A  2  54  'dvo  1  de  r  1  ; 
f read f ho  Id.  r .  I.  2.  file]); 


columns =ho lde r [ 0 ] 4 256*ho 1 der [  1  ]  ; 
targhead[ 12 ]=holder [0]  ; 
targhead[13] =ho Ider  [  1  ]  ; 
f read(holder ,  1,  2,  filel); 

rows=holder [ 0 ] +256*holder  [  1 j  ; 
targhead[ 14 ]=holder [01  ; 
targhead [15] =ho lder  [  1 ]  ; 
fwr ite ( targhead , 1 , 18 , file2)  ; 

/'"read  in  Imaging  Technology  and  write  TARGA  one  row 
for ( i  =  rows - 1 ;  i>^0;  i--) 
i 

seek_length  =  (long)i  *  columns  4  64  t  coinment_ lcn 
fseek( filel,  seek  length,  0); 
fread(buf fer ,  1,  columns,  filel); 
fwr i te (buf f e r ,  columns,  1,  file2); 

\ 

fc lose (filel)  ; 
fclose(file2)  ; 
pr  intf  (  "clone  \n"); 


/' 

/-; 

/' 

/'■ 

/' 

/' 

/' 

/-; 

/-; 

/' 

/■; 

/"' 

/ 

/ 


'<  k  k  kkkkkk  k  k  •> 

IMG2TAR2 . C 


>  X  XXXXX /fXTVVf  XX  "X”  VC  VC  VC  VC  VC  VC  VC  VC  VC  VC  VC  V 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CONVERSION  PROGRAM  FOR  IMAGING  TECHNOLOGY  TO  TARGA  FILE  FORMAT 

by  Capt  John  Cline 
September  30,  1989 

-'This  program  CONVERTS  a  user  specified  480X512  Imaging  Technology 
'file  to  a  400X512  TARGA  file  format  by  deleting  the  last  80  rows. 
'An  18  byte  header  is  added  to  the  TARGA  file;  and  since  Imaging 
'Technology  files  start  from  the  top  and  TARGA' s  start  from  the 
'bottom,  inversion  is  necessary.  The  program  IMG2TAR.C  will  create 
'"TARGA  files  that  match  the  size  of  the  input  Imaging  Technology 
'"file. 


*/ 

-••/ 

*/ 

"7 

*/ 

*/ 
*/ 
*/ 
'*  / 
*/ 
*/ 
*/ 


kkkkkkk  'k  'k  'k  k  'k  'k  'k  'k  kkk  'k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  v' 


*****/ 


-include  "stdio.h" 
-include  "string. h" 


int  i ,  j ,  k ; 

unsigned  wastelength; 

char  filename [ 256 ] ,  f ilename2 [ 256 ] 

unsigned  contnentlength ; 

char  buf fer i t [ 100 ] [ 5 12  ]  ; 

char  targhead]]  =  { '\x00' ,  '\x00' , 

' \x00 ' ,  ' \x00 ' , 

' \x00 ' ,  ' \x02 ' , 


wasteheader [ 200] ,  holder] 512  j  ; 


'  \x03 ' ,  '  \x00 '  ,  ' \x00 ' , 
'\x00' ,  ' \x00 ' ,  1 \x00 ' , 
' \x90 ' ,  ' \x01 ' ,  ' \x08 ' , 


'  \x00 '  . 

'  \x00 '  , 

'  \x00 '  ! ; 


FILE  *filel,  *file2; 
void  main() 


/■'get  file  names  and  open  f i les*/ 

printf  ( "Enter  complete  path  and  file  nariK  of”); 

pr intf ( "  480X512  IMAGE  TECHNOLOGY  file.\n"); 

sea nf("%s",  filename); 

filel=fopen( filename , " rb" ) ; 

printf ( "Enter  complete  path  and  filename  of  400X512  TARGA  file.Xn"); 
scanf("%s",  filename2) ; 
f i le2=fopen( f i lename2 , "wb" ) ; 


/"'write  header*/ 

fwr i to ( ta rghead ,  s izeof ( targhead) ,  1,  fil«2): 

/*get  Imaging  Technology  file  specs*/ 
f read (was teheade r ,  1,  4,  filel); 
comment length=was teheader [ 2  j  f256*wastoh<  nder  ■  3 i  ; 
was  telength=64  4-comment,  length; 

printf ( "Count  to  4\n"); 
for(i=0;  i<-t ;  i  +  +  ) 
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printf ("%d\n" , i  +  1)  ; 

fseek(filel,  was te length+5 1200*( 3 - i )  ,  0); 
f read(buf fer it ,  1,  51200,  filel); 
for(j=0;  j <50 ;  j++) 

( 

for (k=0 ;  k< 5 1 2 ;  k++) 

{ 

holder [ k ] =buf fer i t [ j J [kj  ; 
bufferitf j ] [ k ] =buf fer it [ 99 - j ] [k] ; 
buffer  it [ 99 -j ] [ k ] =ho Ider [ k ]  ; 

1 

) 

fwrite (bufferit ,  s izeof (buffer it) ,  1,  file2) 

) 

fclose (filel) ; 
fclose(file2) ; 

l 


APPENDIX  F.  TAGGED  IMAGE  FILE  FORMAT  f TIFF ) 

This  appendix  presents  information  relating  to  the 
conversion  of  TARGA  files  to  TIFF  for  import  into  Word 
Perfect  5.0.  This  technique  created  the  grey  scale  imagery 
that  is  pictured  in  Chapters  III,  IV,  and  V.  The  software 
provided  by  the  vendor,  TRUETIF.EXE  [32],  did  not  interface 
well  with  Word  Perfect  5.0.  The  resulting  images  in  Word 
Perfect  appeared  to  be  shifted  by  several  pixels.  For  that 
reason,  software  was  written  to  correct  the  problem. 

A  discussion  of  the  necessary  fix  actions  is  given 
below.  Computer  code  written  during  this  thesis  effort  in 
"C"  for  Borland's  Turbo-C  compiler  is  also  included. 

Limited  documentation  is  available  for  TIFF  at  AFIT  [40]. 

F.l  TIFF  Conversion  Software 

By  inspection  of  the  various  files  created  by 
TRUETIF.EXE,  and  through  trial  and  error  techniques,  a 
little  was  learned  about  TIFF  headers.  The  result  was  that 
a  modified  header  file  "tifhead. f il"  was  created.  Using 
this  header  as  a  baseline  for  (400X512  images) ,  only  two 
observations  were  necessary  to  make  the  header  generic.  The 
first  was  that  the  width  in  pixels  was  located  in  bytes  30 
and  31,  while  the  height  in  rows  was  located  in  bytes  42  and 
43,  so  these  four  bytes  had  to  be  changed  for  different  file 
sizes.  The  second  was  that  the  header  indicated  that  the 
TIFF  file  would  begin  at  the  top  left  corner,  so  lack  of 
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TIFF  documentation  dictated  inverting  the  TARGA  data. 

Two  programs  appear  below:  TAR2TIF.C,  which  converts  a 
400X512  TARGA  file  to  TIFF;  and  TAR2TIF2 . C ,  which  converts 
TARGA  files  of  any  size  to  TIFF.  TAR2TIF.C  runs  faster! 

One  additional  note:  An  error  message  appears  in  Word 
Perfect  when  these  files  are  imported.  Ignore  it  when  it 
appears  (by  pressing  [Enter]),  and  everything  will  work 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CONVERSION  PROGRAM  FOR  TARGA  TO  TAGGED  IMAGE  FILE  FORMAT  (TIFF) 

by  Capt  John  Cline 
October  31 ,  1989 


/*  TAR2TIF. C 
/* 

/* 

/* 

/-A 

/* 

/* 

/"This  program  CONVERTS  a  user  specified  400X512  TARGA  file  to  TIFF. 
/*A  222  byte  header  is  added  to  the  TARGA  data  to  create  this  file 
/*which  imported  into  Word  Perfect  5.0.  The  222  byte  header  is  read 
/*from  the  file  "tifhead. fil"  which  must  be  present  for  this  program 
/*to  work.  Since  TARGA  files  start  from  the  bottom  and  this  header 
/"'specifies  starting  from  the  top,  inversion  is  necessary.  The 
/'"program  TAR2TIF2.C  can  convert  TARGA  files  of  any  size,  but  runs 
/"'slower. 

j/  "k  'k  ~k  'k'k'k'k'k'k  'k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  ‘/V  k  k  k  k  k  k  'V  k  ‘/V  k  k  k  k  k  k  k  k  k  k  k  k  v 


^include  "stdio.h" 

^include  "string. h" 

int  i , j , k ; 

char  holder [ 512] ,  buffer[ 100] [ 512] ; 
char  filename [ 256 ] ,  f ilename2 [ 256 ] ; 
char  tifhead[ 222 ] ; 

FILE  * f i 1 e 1 ,  * f i 1 e 2 ; 


void  main() 

{ 

/*read  in  header*/ 
filel  =  fopen( "tifhead . f il"  ,  "  rb"  )  ; 
fread( tifhead, 1 ,222, filel)  ; 
fclose(filel) ; 


/*get  file  names  and  open  files*/ 

printf ( "Enter  complete  path  and  file  name  of  TARGA  file.\n"); 
scanf("%s",  filename); 
f i le l=f ope  in,  t i iename , " rb" ) ; 

printf ( "Enter  complete  path  and  file  name  of  TIFF  file.\n"): 
scanf("%s",  filename2) ; 
f ile2=fopen( f i Iename 2 , "wb" ) ; 

/*write  header*/ 
fwrite(tifhead, l,222,file2) ; 


/*read  in  TARGA,  invert,  and  write  TIFF*/ 
pr intf ( "Count  to  4\n"); 
for(i=0;  i<4 ;  i++) 


pr i ntf ( ”%d\n” , i f 1 ) ; 

fseek( filel ,  18+ 153600- i*51200 , 0) ; 

f read (buf  for .  1,  51200,  filel); 


for ( j =0 ;  j<50 ;  j++) 


( 

for (k=0 ;  k<512;  k++) 

{ 

holder [ k] =buf fer [ j ] [ k ] ; 
buffer[j ] [k]=buffer[99-j ] [k] ; 
buffer[99-j ] Ik] =holder [ k ] ; 


) 

fwrite (buffer ,  51200,  1,  file2); 

) 

fclose ( f ile 1 ) ; 
fclose(f ile2)  ; 

] 

/'k'k'k'k'k'k'k^c'k'k'k'k'k'k'kic'k^cic'k'k'k'k'k'krk'k-k'k’k-k'k'k’k'k'k-Jrk' 


k  'k  • 
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y  'A'  kkkkkkkkkkkkkkkkkkkkkkkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  / 

/*  TAR2TIF2.C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY  */ 

/*  CONVERSION  PROGRAM  FOR  TARGA  TO  TAGGED  IMAGE  FILE  FORMAT  (TIFF)  */ 
/*  by  Capt  John  Cline  */ 

/*  October  31,  1989  */ 

/*  */ 

/*This  program  CONVERTS  a  user  specified  TARGA  file  of  any  size  to  */ 
/*TIFF.  A  222  byte  header  is  added  to  the  TARGA  data  to  create  this  */ 
/*file  which  imported  into  Word  Perfect  5.0.  The  222  byte  header  is  */ 
/"'read  from  the  file  "  tifhead.  f  il"  which  must  be  present  for  this  */ 
/"-program  to  work.  The  header  must  be  modified  to  reflect  the  proper*/ 
/*file  size.  Also,  since  TARGA  files  start  from  the  bottom  and  this  */ 
/*header  specifies  starting  from  the  top,  inversion  is  necessary.  */ 

/*The  program  TAR2TIF.C  can  convert  only  400X512  TARGA  files,  but  is  */ 
/*much  faster.  */ 

#include  "stdio.h" 

??include  "string. h" 
long  int  seek_length; 
int  i ,  columns ,  rows ; 

unsigned  char  filename [256 ] ,  f ilename2 j 256 ] ,  buffer[512],  targhead [ 1 8 ] ; 
unsigned  char  tifhead[ 222 ] ; 

FILE  *f ilel ,  *file2; 

void  main() 

( 

/*read  in  header*/ 
filel=fopen( " t i fhead . f i 1 " ,  " rb" )  ; 
f read( tifhead , 1, 222, filel) ; 
fclose(f ilel) ; 

/*get  file  names  and  open  files*/ 

printf ("Enter  complete  path  and  file  name  of  TARGA  file.\n"); 
scanf("%s",  filename); 
filel=fopen( filename , "rb" ) ; 

pr intf (" Enter  complete  path  and  file  name  of  TIFF  file.\n"); 
scanf("%s",  filename2) ; 
f i le2=f open ( f i loname2 , "wb" ) ; 


/■--get  TARGA  input  file  specs  and  write  Imaging  Technology  header*/ 
f read( targhead ,  1,  18,  filel); 

columns® ( int ) targhead [ 12  J  +2 56* ( int ) targhead [13] ; 

rows= ( int ) targhead [ 14 ] +256* ( int) targhead [ 1 5  j ; 

tifhead[ 30 ] “targhead [ 12] ; 

t i fhead] 31 ]= targhead [ 13 ] ; 

t i fhead [42 ] =targhead [ 14 ] ; 

tifhead[43] = targhead [15]; 

fwr i te ( t i fhead , 1 , 222 , f i le2 ) ; 


/*read  in  TARGA  and  write  TIFF  one  row  at  a  time*/ 
for (i  =  rows - 1 ;  i>=0;  i--) 

( 

seek_length  =  (long)i  *  (long)columns  +  18; 
fseek(filel,  seek_length,  0); 
f read(buf fer ,  1,  columns,  filel) ; 
fwrite (buffer ,  columns,  1,  file2) ; 

) 

fclose(filel) ; 
fclose ( f ile2 ) ; 
printf("done  \n"); 

a'  a" XX  a1  aTXXX XXXX  a"  XX'a -)t'A  aT ^XXX /n 'a  XXX'a  a’XX'a  XXXXXXXXXXXX  VC XXX X 
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APPENDIX  G.  EQUIPMENT  CONTROL  SOFTWARE 

This  appendix  presents  information  relating  to  software 
written  for  equipment  control  during  this  thesis.  The 
equipment  controlled  by  this  software  are  the  MOSLM  and  the 
TARGA  framegrabber ,  discussed  in  Appendices  A  and  B 
respectively.  The  software  includes  DOS  batch  files,  . CMD 
files  for  use  with  the  vendor  program  TESTTARG.EXE 
(discussed  in  Appendix  B) ,  and  programs  written  in  "C"  for 
Borland's  Turbo-C  compiler. 

Much  of  the  code  assumes  certain  locations  for  various 
files.  The  program  TESTTARG. EXE,  and  its  associated  .CMD 
files,  as  well  as  all  TARGA  image  files  are  assumed  to  be  in 
the  \TARGA  directory.  The  compiled  versions  (.EXE  files)  of 
the  Turbo-C  programs  are  assumed  to  be  in  the  \TURC 
directory.  The  Turbo-C  programs  also  occaisionally  call  on 
support  files  that  must  also  be  located  in  the  \TURC 
directory.  The  batch  files  were  located  in  the  root 
directory  of  the  hard  drive,  and  the  various  other  files 
were  properly  placed  at  the  time  of  writing  this  thesis. 

This  appendix  is  divided  into  three  sections  which 
relate  to  alignment  software,  JTC  software,  and  LPCT 
software.  All  software  will  appear  at  the  end  of  the 
section.  Presentation  order  will  follow  the  order  of 
application  discussion.  Batch  files  will  be  presented 
first,  followed  by  the  .CMD  files  used  with  TESTTARG.  IE , 
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then  the  Turbo-C  source  code. 


G.l  Alignment  Software 

Six  useful  MOSLM  patterns  were  available  to  assist  in 
alignment  of  the  hybrid  optical/digital  architecture.  The 
test  signal,  two  checkerboard  patterns,  and  the  crosshair 
were  described  in  Appendix  A,  and  the  software  needed  to 
display  these  patterns  was  also  presented.  Two  other 
patterns  were  also  useful;  these  were  three  annuli  displayed 
simultaneously,  and  the  wagon  wheel  test  pattern  pictured  in 
Figure  7a  of  Chapter  III  and  used  in  the  experiments  of 
Chapter  IV. 

The  first  three  patterns  reguired  only  a  live  camera 
to  be  useful  (see  LIVE . BAT  in  Appendix  B) .  However,  the 
crosshair  pattern  could  either  be  helpful  with  the  camera  in 
live  mode,  or  when  used  with  the  TESTTARG.EXE  command  file 
"x-hair . cmd" . 

To  ensure  proper  capture  of  Fourier  features  (step  3 
of  Figure  29  in  Chapter  V),  CCD1  (see  Figure  28)  had  to  be 
positioned  so  that  the  origin  of  Fourier  plane  was  centered 
within  the  capture  region  of  the  TARGA  f ramegrabber .  By 
running  the  X-HAIR. C  (listed  in  Appendix  A),  a  crosshair 
pattern  was  seen  on  CCD1.  The  batch  file  X-HAIR. BAT  using 
TESTTARG.EXE  with  the  command  file  "x-hair . cmd" ,  would 
capture  a  centered  128X128  region  and  redisplay  it  with  a 
black  crosshair  superimposed  on  it.  CCD1  could  then  be 
aligned  so  that  the  black  crosshair  lined  up  with  the  bright 
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one  created  by  the  MOSLM  pattern. 

The  three  annuli  program,  3-ANNULI. C,  displayed  annuli 
in  each  of  the  top  two  corners  of  the  MOSLM,  and  a  third  in 
centered  in  the  lower  half.  When  the  resultant  pattern  was 
viewed  in  the  Fourier  plane,  interference  fringes  could  be 
seen  from  the  three  combinations  of  annuli  pairs.  This 
pattern  could  be  used  to  test  for  proper  focus  in  the 
Fourier  plane. 

The  last  MOSLM  pattern  program,  W-WHEEL.C,  was  used  to 
test  the  LPCT  portion  of  the  hybrid  architecture  as 
discussed  in  Chapter  IV.  Using  it,  and  the  TESTTARG.EXE 
command  file  "110X456.cmd",  CCD2  of  Figure  28  could  be 
properly  aligned,  since  "110X456.cmd"  was  also  used  during 
execution  of  the  batches  associated  with  the  hybrid 
architecture.  The  DOS  batch  file  110X456.BAT  would  properly 
execute  TESTTARG.EXE,  after  running  W-WHEEL.C. 
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: X-HAIR . BAT 

:This  batch  file  will  execute  TESTTARG  using  the  command  file 
: "x-hair . cmd"  after  initializing  the  TARGA  variables.  It  is 
:useful  for  centering  a  camera,  and  should  be  run  after 
: running  X-HAIR. C. 

echo  off 
els 

CD  \TARGA 
SET  TARGA=247 
SET  TARGASET=T8X- 10G 
testtarg  <x -ha ir . cmd 


: X-HAIR. CMD 

:This  is  a  command  file  to  be  executed  with  the  program  TESTTARG, 
:using  the  DOS  batch  file  command  C>X-HAIR.  It  will  grab  the 
reenter  128X128  pixels  on  the  live  TARGA  monitor.  Then  redisplay 
: this  frame  after  drawing  a  dark  crosshair  through  the  center. 

: I t  is  useful  for  centering  a  camera,  and  should  be  used  after 
: running  the  program  X-HAIR. C. 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  CAPTURE 
erase 
0 
0 
0 

erase 

0 

0 

0 

: GRAB  FRAME 

grab 

di  s 

: DRAW  CROSSHAIR 
line 

2 

255 

0 

255 

399 

-1 

line 

2 

0 

199 
5r 
199 
-  1 
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: SAVE  CENTER  128X128 
putp i c 
grabl28 
192 
136 
319 
263 
-1 

erase 

0 

0 

0 

: REDISPLAY  CENTER  128X128 
getpic 
grabl28 
0 
0 
-1 

graphend 

quit 


f  'kk'kk'kk'k'kk'kk k k kkkk k k k k k k k k k k k k k k k k k k k k k k kkkk k k k k k k k  ■> 


/*  3- ANNULI. C 
/* 

/* 

/  " 

/* 

/* 

/* 

/*This  program  creates  a  test  pattern  containing  three  annuli,  one 
/* 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CAMERA  ALIGNMENT  TEST  PATTERN 
by  Capt  John  Cline 
Julv  31,  1989 


/* 

/* 

/* 

/* 


in  each  of  the  two  top  corners  of  the  SLM,  and  one  centered  on  the 
lower  half  of  the  SLM.  When  the  camera  is  properly  focused  in  the 
Fourier  plane,  fringes  associated  with  the  three  pairs  of  annuli 
will  be  visible. 


rxxxxw  x  x  x  x  x 


•*/ 

*/ 

*/ 

*/ 


*■-  / 

'V 


*/ 

*/ 

*/ 
'k  / 

*/ 

*/ 

*/ 


^include  "stdio.h" 

^include  "string. h" 

-’nclude  "math.h" 

int  i,  j,  k,  x,  y,  xc ,  yc ,  col,  row; 

float  outradsquared=196 ,  inradsquared=100 ,  test; 

float  xref-64,  yref=14; 

unsigned  char  slm  [  128  ]  [  64  ]  ,  temp  [  12.8  ][  128  j  ,  filename  [  256  ]  ; 

void  main() 

( 

prepare  s lm( )  ; 

/■-initialize  temp  matrix-/ 
for(row=0;  row<128;  rowtt) 

1 

for ( co  1=0;  cold 28;  col+t) 

{ 

temp [ row] [ co 1 ] =1 ; 


/'-'write  the  reference  circle*/ 
for  (col=5();  col<79;  colt  4) 

I 

for  f row-0 ;  row<29 ;  rowt t ) 

( 

t  es  t  =  (  row- y  n' f  )  *  i.  row  -  vre  f )  4  c  co  1  -xref  ’>*  (col -xrel  )  : 
iff  tes tOout radsqua red  &N  test >*=i nradsqua red  i 
: emp [ row ]  [col  j  =0 ; 

! 

1 

/-write  the  top  circles*,/ 
f  or  ( row  99;  rowd?8;  row  4  t) 

I 


f  o  r  (  r  o  1  0  ;  r  o  1  <  J  9  i  •  i  >  1  4  I  ) 
1 


tes t=( row- 113 )* ( row- 113)+(col-14)* (col-14)  ; 
i f ( tes t<=outradsquared  &&  test>=inradsquared) 
temp [ row] [ col ] =0 ; 

I 

for(col=99;  col<128;  col++) 

( 

test=( row- 113) *(row-113)+(col-113)* (col-113); 
if ( test<=outradsquared  &&  test>=inradsquared) 
temp[rcw] [col]=0; 

} 

) 


conver t_temp _to_sln () ; 
wri te_to_s lm( ) ; 


prepare_slm( ) 


char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ; 

*(semetex+0x800)=l ; 


**/ 


/"'clear  slm*/ 


/  ~r\~r\  x  vc  Jcic  x  x  x  vc  ’stx  vc  x  “/rx  x  x  x  xx  xx  xx  x  x  xvc  x-x  X'  x'x*  ^ 

conver t_temp_to_slm( ) 

{ 

/■^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM*/ 

printf ( "creating  Sill  format  \n"); 
for(x=0;  x<128;  x++) 

1 

for(j=0;  j < 1 6 ;  j++) 

I 

slm [ x  ]  [4*j  ]  *-2*temp[126-8*j  ]  [ x ]  +temp [  127  - 8* j  j  [  x  ]  +  232  ; 

slm [ x ] [ 4*j  +  1 ] =8*temp [ 1 24  -  8*  j ] [ x ] +4* temp [ 1 2  5  -  8* j ] [ x ] +24  3 : 
slmtxj [ 4*j  +2 ] =32*temp [ 122  - 8*j ] [x]  +  16*temp[ 123-8*j ] [xj+207: 
s  1  m  ( x  ]  [  4*j  +  3  ]  =1 28*  temp  [  120  -  8*j  ]  [x]  i  64*Uaip[  121 -8*  j  j  [x!+63; 


write  to  slm() 


/*Write  the  SIM  array  to  the  SIM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO; 
printf ( "wri t ing  to  the  SIM  \n" ) ; 
for  ( j  -  0  ;  j  <  10  ;  j  *■  t ) 

( 

f  rir(x~0;  x<128;  H  ) 

I 
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i=x+128*j ; 

*(semetex+i)  =  slm[x] [4*j  j ; 
*(semetex+i)  =  slm[x] [ l+4*j ] 
*(semetex+i)  =  slm[x] [2+4*j ] 
*(semetex+i)  =  slm[x 1 [ 3+4* j ] 


*(semetex+0x801)-l ; 

) 

k&X**&****'k'k'k'k'k'k'k'kic'k'k'k'k'k'k‘k'k'k-'k'k'k'k'k'k'k-k'k-k'jc'k'Je'k'><: 


/'kkk'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'kk'k'k'k'k'k-k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k  'k  'A-  'A'  -A'  -k  k  k  k  k  k  k  k  k  k  k  k  f 

/*  W - WHEEL. C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY  */ 

/*  LOG  POLAR  COORDINATE  TRANSFORM  TEST  PATTERN  */ 

/*  by  Capt  John  Cline  */ 

/*  August  31,1989  */ 

/*  */ 

/-This  program  creates  a  test  pattern  containing  three  concentric  */ 

/^circles,  whose  inner  and  outer  radii  are  logarithmic  related,  and  */ 
/*eight  radial  lines,  every  45  degrees  apart.  The  pattern  is  used  to*/ 
/*test  the  LPCT  CGH ,  since  the  result  coordinate  transform  is  an  */ 

/*easily  predictable  grid  pattern.  */ 

/k'kkkk'k'k  'k  k  kkkkkk'k'kkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  vr  k  k  k  / 


^include 

#include 

^include 

^include 


"stdio .h" 
"string . h" 
"math . h" 

" t ime . h" 


int  i,  j,  k,  x,  y,  col,  row,  inner,  outer; 
float  outer_squared,  inner_squared ,  test; 
unsigned  char  slm ( 128 ] [ 64 ] ,  temp [ 128 ]( 128 ] ; 


void  main() 


prepare_slm( ) ; 

/*initialize  temp  matrix*/ 
for(row=0;  row<128;  row++) 

( 

for(col=0;  col<128;  col++) 

( 

temp [ row] [ col ] =1 ; 


pr int f ( "calculating\n" ) ; 

/*c rente  +  */ 

for(i=0;  i< 1 2  8 ;  i+  +  ) 

I 

for(j  =  62;  j <66 ;  j  +  +  ) 

( 

tempi i ] [ j 1=0; 
temp [ j  j [ i ] =0 ; 


/*c rente  X*/ 

for  (  i=18  ;  i<l  10  ;  i-n) 


1  5  7 


for ( j  =  ] 8 ;  J < 1 1 0  ;  j  +  *  ) 


{ 


if (abs ( i - j )<=2  ||  abs ( i+j - 127 )<=2 )  temp [ i ] [ j ] =0 ; 


} 

) 

/^create  circles*/ 

for(inner=15 ;  inner<64;  inner=inner*2) 

( 

inner_squared=inner*inner ; 
outer=inner*16/15 ; 
outer_squared=outer*outer ; 
for  (col=64-outer ;  col<65+outer ;  col++) 

{ 

for(row=64-outer ;  row<65+outer ;  row++) 

{ 

test=(row-64)*(row-64)+(col-64)*(col-64) ; 
if  ( test.<=outer_squared  &&  test>=inner_squared) 
temp[row] (col]=0; 


} 

convert_temp_to_slm( ) ; 
write _to _slm( ) ; 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  k  k  k  k  / 

prepare_slm( ) 

{ 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO; 

*(semetex+0x800)=l ;  /*clear  slm*/ 

! 

/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 

convert_temp _to_slm( ) 

( 

/^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM*/ 

printf  (  "creating  S IJM  format  \n"); 
for(x=0;  x<128;  x++) 

( 

for  ( j=0 ;  '16  ;  j++) 

I 

slm [ x ] [ 4*j )  =2* tempf 126-8 * j ] [x]+ tempi 127-8*j ] [x] +252 ; 

slm[ x ] [ 4*j +1 ] =8* temp [ 124  - 8*j j [ x ] +4* temp [ 1 25  - 8*j j  [ x ]  i 24  3 : 
s lm [ x ] [ 4*j +2 ] =3 2* temp [122- 8* j ] [ x ] + 16* temp [ 12  3  - 8*j ] [ x ] +207 ; 
slm [ x ] [ 4*j  +3 ] =12 8* temp [ 120 -  8* j ] [ x ] +64* temp  j 1 2 1  -  8* j j [ x ] 1 6 3 ; 
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( 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  -  (char  far  *)  OxbOOOOOOO ; 
printf( "writing  to  the  SLM  \n"); 
for( j=0 ;  j <16 ;  j++) 

( 

for(x=0;  x<128;  x++) 

( 

i=x+128*j ; 

*(semetex+i)  =  slm[x] [4*j ] ; 
*(semetex+i)  =  slm[x] [ l+4*j ] 
*(semetex+i)  =  slm[ x ] [ 2+4*j ] 
*(semetex+i)  =  slm[x]  [  3+4*j  ] 

) 

] 

* ( semetex+0x801 )=1 ; 


: 110X456 . BAT 

:This  batch  file  is  used  to  grab  a  110X456  pixel  region  on  the  TARO A 
: f ramegrabber  system.  This  region  represents  the  area  of  interest  for 
: the  log-polar  coordinate  transformation.  By  using  this  batch  file, 
:which  executes  TESTTARG.EXE  using  the  command  file  11 1 10X4  5b  .  cmd"  . 
:proper  alignment  of  the  camera  can  be  achieved  without  performing,  the 
: entire  process.  The  test  pattern  generated  by  W-WHEKL.C  can  provide 
:an  appropriate  pattern  for  alignment,  so  that  program  should  be  run 
: before  executing  this  batch. 

echo  off 
els 

CD  \TARGA 
SET  TARGA=247 
SET  TARGASET=T8X-10G 
testtarg  <110x456. cmd 


: 1 10x456 . CMD 

:This  is  a  command  file  to  be  used  with  the  TARGA  program  TESTTARG.EXE 
: I t  is  used  at  various  stages  of  the  log  polar  coordinate  transform 
: routines.  After  grabbing  a  region  of  110X456  pixels,  the  data  is 
: in  TARGA  format  in  the  file  "grablrt . tga" . 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 
e  rase 
0 
0 
0 

e  r  a  s  e 
0 
0 
0 

: GRAB  THE  FRAME 
g  r  a  b 
d  i  s 

: SAVE  PROPER  110x456 
put  pic 
p,  r  a  bl.t't 

)  g 

4  3 
4  8  3 
158 

-  1 

e  rase 
0 
0 
( i 
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: REDISPLAY  SAVED  SECTION 
getpic 
grablrt 
0 
0 
-1 

graphend 

quit 
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G . 2  JTC  Software 

There  were  five  ways  to  execute  the  JTC  for  this  thesis: 
1)  the  mean  difference  method  of  fringe  binarizat ion ;  2)  using 
a  simple  mean  value  threshold  for  fringe  binarization ;  3)  the 
median  value  threshold;  4)  the  zero  difference  method;  and 
5)  a  segmented  scene  input  using  the  zero  difference  method. 
These  correspond  to  Figures  14  -  17  and  20  of  Chapter  III, 
respectively,  and  their  associated  batch  files  are  listed  as 
JTHF-1 . BAT  through  JTHF-5.BAT. 

Two  other  types  of  JTC  batch  files  were  also  possible: 
JTC-CAL. BAT  and  JTC-TST.BAT.  These  two  batches  provided 
calibration  for  the  JTC  and  tested  that  calibration  using  two 
small  annuli  as  scene  and  template  inputs.  The  technigue  of 
JTHF-1. BAT  was  used.  JTHF-CAL.BAT  had  to  be  run  four  times 
to  complete  the  calibration  process.  Each  time  the  program 
was  run  the  user  would  have  to  select  a  different  corner  to 
display  the  scene  annulus  in.  After  all  four  corners  were 
finished,  a  complete  set  of  data  was  available  for  linear 
interpolation  of  correlation  planes.  JTHF-TST.BAT  could  then 
be  run  to  verify  the  calibration,  since  it  too  displayed 
annuli,  at  a  user  specified  location. 

All  seven  of  the  batch  files  will  be  presented  with 
JTHF-CAL.BAT  first,  then  JTHF-TST.BAT  next,  followed  by  the 
other  five  presented  in  order.  After  the  batch  files,  the 
. CMD  files,  used  with  TESTTARG.EXE,  will  be  presented  in  their 
order  of  appearance.  Finally,  the  Turbo-C  source  code  will 
be  presented,  again  in  its  order  of  appearance. 
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: JTHF-CAL.BAT 

:This  is  the  batch  file  to  calibrate  the  Joint  Transform 
:Correlator  using  the  average  difference  method.  It 
:must  be  run  four  times  to  complete  calibration. 

echo  off 
els 

: display  scene  and  template  annuli 

cd  \turc 

call-hf 

.'capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=247 

SET  TARGASET=T8X- 10G 

testtarg  <jtl-hf.cmd 

els 

: display  scene  annulus  alone 

cd  \turc 

disptop 

:capture  Fourier  transform  of  scene  alone  (256X256  pixels) 
CD  \TARGA 

testtarg  <top-hf.cmd 
els 

: reduce  the  two  256X256  files  to  128X128 

cd  \turc 

tar2hlf 

:Find  the  pixel  by  pixel  difference  and  binarize  on  average 
.'difference,  then  display  on  SLM. 
j  t-diff 

:Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  <jt2-hf.cmd 
els 

:Reduce  320X256  to  160X128 
cd  \turc 
tar2hl f 2 

: Locate  peaks  and  save  as  cal  data 
cal2 -hf 
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: JTHF-TST.BAT 

:This  is  the  batch  file  for  testing  the  calibration  of 
: the  Joint  Transform  Correlatorusing  the  average 
difference  method.  The  only  difference  between  this  and 
:JTHF-1.BAT,  is  the  first  Turbo-c  program  executed. 

echo  off 
els 

.'display  scene  and  template  annuli 

cd  \turc 

circ-hf 

:capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=247 

SET  TARGASET=T8X- 10G 

testtarg  <jtl-hf.cmd 

els 

display  scene  alone 

cd  \turc 

disptop 

:capture  Fourier  transform  of  scene  alone  (256X256  pixels) 
CD  \TARGA 

testtarg  <top-hf.cmd 
els 

: reduce  the  two  256X256  files  to  128X128 

cd  \turc 

tar2hlf 

:Find  the  pixel  by  pixel  difference  and  binarize  on  average 
difference,  then  display  on  SLM. 
j  t-diff 

:Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  Cjt2-hf.cmd 
els 

: Reduce  320X256  to  160X128 

cd  \turc 

tar2hlf2 

: Locate  peaks  and  interpret 
bull-hf 

display  results  on  TARGA  monitor 
CD  \TARGA 
testtarg  <} t3.cmd 
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: JTHF-l.BAT 

'.This  is  the  hatch  file  for  the  Joint  Transform  Correlator 
:using  the  average  difference  method. 

echo  off 
els 

: display  scene  and  template 
cd  \turc 
dis -hf 

:capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=267 

SET  TARGASET=T8X-10G 

testtarg  <jtl -hf.cmd 

els 

'.display  scene  alone 

cd  \turc 

disptop 

.•capture  Fourier  transform  of  scene  alone  (256X256  pixels) 
CD  \TARGA 

testtarg  <top-hf.cmd 
els 

: reduce  the  two  256X256  files  to  128X128 

cd  \turc 

tar2hlf 

.'Find  the  pixel  by  pixel  difference  and  binarize  on  average 
.'difference,  then  display  on  SLM. 
j  t-dif f 

'.Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  <jt2-hf.cmd 
els 

: Reduce  320X256  to  160X128 
cd  \turc 
tar2hlf 2 

: Locate  peaks  and  interpret 
bull -hf 

: Display  results  on  TARGA  monitor 
CD  \TARGA 
testtarg  <j t3.cmd 


:  JTHF-2.BAT 

:This  is  the  batch  file  for  the  Joint  Transform  Correlator 
:using  the  mean  value  fringe  binarization  technique. 


echo  off 
els 

: display  scene  and  template 
cd  \turc 
dis -hf 

.'capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=247 

SET  TARGASET-T8X-10G 

testtarg  <jtl-hf.cmd 

els 

:Reduce  256X256  to  128X128,  binarize  on  mean  value,  and 
: display  on  the  SLM. 
cd  \turc 
f t_both 

:Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  Cjt2-hf.cmd 
els 

: Reduce  320X256  to  160X1 >8 

cd  \turc 

tar2hlf2 

: Locate  peaks  and  interpret 
bull-hf 

: Display  results  on  TARGA  monitor 
CD  \TARGA 
testtarg  <jt3.cmd 
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:  JTHF-3 . BAT 

:This  is  the  batch  file  for  the  Joint  Transform  Correlator 
:using  the  median  value  fringe  binarization  technique. 


echo  off 
els 

: display  scene  and  template 
cd  \turc 
di s -hf 

:capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=247 

SET  TARGASET=T8X- 10G 

testtarg  <jtl-hf.cmd 

els 

: Reduce  256X256  to  128X128,  binarize  on  median  value, 
: display  on  the  SLM. 
cd  \turc 
j  t2med 

:Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  <jt2-hf.cmd 
els 

:Reduce  320X256  to  160X128 
cd  \turc 
tar2hl f 2 

: Locate  peaks  and  interpret 
bull-hf 

:Display  results  on  TARGA  monitor 
CD  \TARGA 
testtarg  <j t3.cmd 


and 


:JTHF-4.BAT 

:This  is  Che  batch  file  for  the  Joint  Transform  Correlator 
:using  the  zero  difference  method. 

echo  off 
els 

: display  scene  and  template 
cd  \turc 
dis -hf 

: capture  the  joint  transform  (256X256  pixels) 

CD  \TARGA 

SET  TARGA=247 

SET  TARGASET=T8X- 10G 

testtarg  Cjtl-hf.cmd 

els 

tdisplay  scene  alone 

cd  \turc 

disptop 

:capture  Fourier  transform  of  scene  alone  (256X256  pixels) 
CD  \TARGA 

testtarg  <top-hf.cmd 
els 

: reduce  the  two  256X256  files  to  128X128 
cd  \turc 
t  a  r  2  h  1  f 

.’Find  the  pixel  by  pixel  difference  and  binarize  on  zero 
:  difference  (i.e.  sign  of  difference),  then  display  on  Sl.M. 
j  t_comb 

: Capture  correlation  plane  (320X236  pixels) 

CD  \TARGA 

testtarg  <j t2-hf.cmd 
els 


: Reduce  320X256  to  160X128 
cd  \turc 
t  a  r  2  h  1  f  2 


: Locate  peaks  and  interpret 
bull-hf 

: Display  results  on  TARGA  monitor 
CD  \ TARGA 
t  e  s t  t  a  rg  < j  t  '.end 


: JTHF-5.BAT 

:This  is  the  batch  file  for  the  Joint  Transform  Correlator 
:using  the  zero  difference  method.  This  batch  differs  from  : JTHF-A . BAT 
in  that  it  performs  the  JTC  using  the  segmented  : scene  from  the  previous 
pass  through  the  JTC. 

echo  off 
els 

: display  segmented  scent  and  template 
cd  \turc 
dis -hf 2 

:capture  the  joint  transform  (256X256  pixels) 

CD  \TARCA 

SET  TARGA=247 

SET  TARGASET-  T8X-10G 

testtarg  <jtl-hf.cmd 

els 

: display  segmented  scene  alone 

cd  \turc 

disptop2 

:capture  Fourier  transform  of  scene  alor.  ■  (256X256  pixels) 

CD  \TARGA 

testtarg  ctop-hf.cmd 
els 

.•reduce  the  two  256X256  files  to  128X128 

cd  \turc 

tar2hlf 

:Find  the  pixel  by  pixel  difference  and  binarize  on  zero 
.'difference  (i.e.  sign  of  difference)  ,  then  display  on  SLT. 
j  t_  comb 

:Capture  correlation  plane  (320X256  pixels) 

CD  \TARGA 

testtarg  <jt2-hf.cmd 
els 

: Reduce  320X256  to  160X128 

cd  \turc 

tar2hlf2 


: Locate  peaks  and  interpret 
bull -hf  2 


: Display  results  on  TARGA  monitor 
CD  \T ARC A 
t  es  t  t  a  rg  <j  t  )  .  ciml 


: JT1 - HF . CMD 

:This  is  a  command  file  to  he  used  with  the  TARGA  program  TKSTTARG .  EXE. 
:It  is  used  in  the  joint  transform  correlator  to  capture  a  ,6 

:pixel  region.  The  data  is  stored  in  the  file  "grabl  2 . t ga ” ,  and  v  i  1  1 
:be  later  reduced  to  128X128  by  the  program  TAR2HLF.C. 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 
e  r  a  s  e 
0 
0 
0 

e  rase 
0 
0 
0 

: GRAB  THE  FRAME 
grab 
d  i  s 

: SAVE  CENTER  2b 6X2 36 
put pic 
grab 1_  2 
128 
72 


-  1 

e  r  a  s  e 
f) 

0 


: K KU I S  PLAY  SAVED  S  ECT I  ON 

ge  tp i c 
grab  1 _? 

0 

0 

- 1 

(’.it  ipl  ic  nd 


:  TOP  - HF . CMD 

:This  is  a  command  file  to  he  used  with  the  TAR  (.'A  program  TESTTARt 
:  It  is  used  in  the  joint  transform  correlator  to  capture  a  2 36X2  S' 
:pixel  region.  The  data  is  stored  in  the  file  "top  2 . tga" ,  and  wi 
:be  later  reduced  to  128X128  by  the  program  TAR21ILF.C. 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME 


0 

0 

0 

e  rase 
0 
0 
0 


: GRAB  THE  FRAME 
grab 
d  i  s 

.-SAVE  CENTER  256X2  56 
putpic 
t  o  p  _  2 
128 
72 
38  5 
32  7 
- 1 

e  rase 
0 
0 
0 


:  REDISPLAY  SAVED  SECTION 


: JT2-HF.CMD 

:This  Is  a  command  file  to  be  used  with  the  TARGA  program  TESTTARO .  EXE . 
:It  is  used  in  the  joint  transform  correlator  to  capture  a  320X250 
■.pixel  region.  The  data  is  stored  in  the  file  "gral>2  2  .  tga"  ,  a  ltd  ..'ill 
:be  later  reduced  to  160X128  by  the  program  TAR2HLF2.C. 

live 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 

erase 

0 

0 

0 

erase 

0 

0 

0 

: GRAB  THE  FRAME 

grab 

dis 

.'SAVE  CENTER  320X2  56 
putpic 
grab2_2 
128 
A  0 
38  3 
T  50 
- 1 

e  rase 
0 
0 
0 

.'REDISPLAY  SAVED  SECTION 
ge t  p  i  c 
grab2_  2 
0 
0 
-  1 

g  r  a  pile  nd 


: JT3 . CMD 

:This  is  a  command  file  to  be  used  with  the  TARGA  program  TEST! 
:  It  is  used  to  display  the  results  of.  the  joint  transform  corn. 

1  i  ve 
e  r  a  s  e 
0 
0 
0 

e  rase 
0 
0 
0 

d  i,  s 

:  GF.T  ORIGINAL  INPUT 
getpic 
d  i  s  p  1  a  v  2 
(.) 

271 

- 1 

: G ET  JOINT  TRANSFORM 

get  pic 

grab! 

128 
2/1 
-  I 

: G FT  FOURIER  OF  SCENE  ALONE 
gc- 1  p  i  r 
t:  o  p 
7  if> 


: G FT  BINARY  VERSION  OF  FRINGES 

ge t  p i c 

(.)  i  na  ry 

380 

7  / 1 


:  GET  COR  RE  I  AT  I<>N  PLANE 

s\e  t  p  i  c 
grab.’ 

O 

I  DO 


: GET  CORRELATION  PLANE  WITH  LOCATED  PEAKS 
getpic 
max 
128 
100 
-  1 

: GET  ORIGINAL  SCENE  WITH  TARGETS  MARKED  WITH  X's 

getpic 

bullseye 

256 

too 

-1 

: GET  SEGMENTED  SCENE 
getpic 
segment 
386 
100 
-1 

: SAVE  ENTIRE  DISPLAY 
putp  ic 
grab  3 
0 

1.00 

511 

309 

-  1 

graphen d 
quit 
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/*  CAL1-HF.C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  INPUT  DISPLAY  FOR  CALIBRATION  OF  THE  JOINT  TRANSFORM  CORRELATOR 
/*  by  Capt  John  Cline 

/*  August  31,  1989 

/* 


/-This  program  displays  a  target  circle  in  one  of  lour  user  specified'- 
/-corners  in  the  top  half,  and  a  reference  circle  in  the  bottom  half 
/'-of  the  SLM .  It  modifies  the  file  "cal  .da  t"  to  let  the  program 
/-CAL2-HF.C  know  which  corner  is  being  used.  It  also  creates  a  TARCA* 
/-file  in  "di splay2 . tga"  for  viewing  on  the  TARCA  screen.  This 
/-program  is  the  first  of  a  series  that  will  provide  calibration  to 
/-the  joint  transform  correlator. 


"include  "stdio.h" 
“include  "string. h” 
-include  "math.h" 


int  i,  j,  k,  x,  v,  xc ,  vc ,  col.  row,  corner; 
float  outradscjuared=16 ,  inradsquared*--4 ,  test; 
float  xref=64,  yref=103; 

char  targhead[]  =  f'\x00’,  '\x00',  '\x03',  '\x00', 

'  \x00  ’  ,  '  \ xOO  ’  .  '  \x0() '  ,  '  \  xOO  '  , 
' \x80 ' ,  ' \x00 ' ,  ' \x80 ' .  ' \x00 ' . 

unsigned  char  slm[ I  28 ] [ 6 A ] ,  targabuf fe r ; 1 28 j ; 1 28 :  , 
unsigned  char  caldata[17]; 

FILE  * f i 1 e 1 : 

vo  i  d  ma  i  n  ( ) 

I 

prepare  slm(); 


'  \x00 '  , 
'\x00'  . 
'  \x08 '  , 


on' 
00  ' 
no' 


tempi  1  28  i  I  128 


/-get  cai 

data 

file*/ 

f  i  1  e  1  =  f  o  p  e 

n("\ 

\turc\\cal 

.dr 

t " . 

" rh" )  ; 

f  read (ca 1 d 

a  t  a  , 

1.17 

f  i  lei 

)  ; 

f  c  1  o  s  e  (  f  i  1 

el)  ; 

/-tind  out 

wh  i 

ch  corner 

t  o 

oh; 

my..*/' 

print! ( " Kn 

te  r 

numbt 

-r  of 

CO  \ 

IK-  I 

to  ch. 

pr  i  nt:  1  ( " 

1) 

7  -  3  I '' 

ji" )  ; 

p  r  i  n  t:  f  (  " 

2) 

]  20-' 

J7*\n" ) 

’ 

pr intf ( " 

3) 

7  -  (j  4 ' 

ji" ) ; 

p  r  i  n  t  f  (  " 

9) 

120- 64\ n"  ) 

ifC 


d " . dco  rner )  ; 


ca  1  data  [  1 9  J  ( uns  i  gned  cha r )  (  conic  r  - 1  )  : 

i  1  tic 


/-assign  the  center 
xc  -  /  ; 


V  O 


)  ‘ 


1 


if (corner==2)  xc=120; 
if (corner==3)  vc  =64 ; 
i f (corner==4 )  xc=120; 
if (corner==4)  yc=64 ; 

/*write  the  updated  file*/' 
f ilel=fopen( "\\turc\\cal . dat" , "wb" ) ; 
fwr ite (caldata ,  17,  1,  filel); 
f c lose (filel) ; 

pr intf ( "calcula t ing\n" ) ; 

/-•write  the  reference  circle*/ 
for  (col=60;  col<69;  col++) 

{ 

for(row=99;  row<108;  row++) 

( 

tes  t= ( row  - yre  t ) * ( row - y re f )  +  ( co 1  - x  re  f ) * ( co 1  - x re  f 
i  f  ( tes  to  out  rad  squared  &&  tes  t>=  inrads  qua  red ) 
targabuf for j 127  -  row ' ' col ] =253 ; 

t 


/'•write  the  target  circle*/' 

for  (col=xc-4;  col<xc+5;  col++) 

{ 

f or ( row=yc - 4 ;  row<vc t 5 ;  rowtt) 

1 

tes t=( row -vc ) *( row- yc ) t ( col  - xc )*(col - xc  )  ; 
i  f  ( tes  t<=out  radsqua  rod  &&  test'-'  inradsquarod) 
targabuf  fe r  [  1 2 7  -  row  ’  f  co  L '  --  2  a  3  : 


save_t.n rgabuf  f or_to_  di  spl  ay2  (  )  : 
convert  t  argabuffer  to  tei:-p( )  ; 

convert  temp  to_  s  lin( )  ; 
write  to  slin(); 


(•pare  si  ini’) 
char  f  ar  'ca-ine*  t  x  ; 

siiTietex  -  (char  far  *)  ()>:!>'  *f)0U( )( )( ) ; 
*  (  seme  t  ox  n()x800)  -  1  ; 


ve  tnrgnbuffer  t  o  di  spl  a  v?  (  ) 

/*save  TAR‘  A  file*/ 

1  /  6 


princf( "writing  TARGA  file  to  targa\\display2 . tga\n" )  ; 

f ilel=fopen( "\\targa\\display2 . tga" , "wb" ) ; 

fwri te ( targhead ,  18,  1,  filel)  ; 

fwr  i  te  ( targabuf  for  ,  1  G  3  84  ,  1,  filc-l); 

fclose(filel) ; 


convert_targabuff'er_to_temp() 

for(i.=0;  i  <  1 2  8  ;  it  +  ) 

( 

for(j=0;  j < 1 2 8 ;  j  +  +  ) 

I 

i f ( ta rgabuf  f er [ i ] [ j ] ==0x00)  temp [  i  ] [ j ] =0x0 1  ; 
else  temp { i j [j ] =0x00 ; 

1 


convert  temp  to  slm() 

! 

/''Convert  2  pixels  into  an  eight  bit  character  for  addressing  the  Sl.M--/ 

pr i nt f ( "c rea t ing  SLM  format  \n"); 
for (x=0  ;  x<  128;  xm) 
t 

for(j=0;  j  - '  1 6  ;  j  +  t) 


s  1  ITl '  X  ; 

:  ■» '  .i ; 

=  2*t 

■  inp  '  l  2  G  -  8*  j 

'  1 1 emp ;  12/- 8*j  •  | 

s  i  in  [  x ; 

;  4 ]  fl  j 

=  8  *  t 

■mp ;  1 34  -  8* j  \  ' x 

i  4*t  emp  ;  18)-  8*  ] 

S  1  1)1  ;  X  • 

i  4  -•  j  i  2  J 

-■■■32* 

emp  j  1  32  -  H  -'-  j 

;  t  1  G-'-t  emp  '  123-8 

S  1  It  ;  X  ; 

!  4*  j  t  3  | 

-128 

■"temp  [  120-  «•'•  j 

' x ;  ( G  4* temp : 1 2 1  - 

o  si 

m  ( ) 

i  te 

the  S !  A 

arrav 

to  tin  S !  .!•!'■ 

far 

■'  seme  t 

i  •  ;*i  ; 

t  (•  M 

( cl  ta  ( 

i  : i  V  *  > 

Oxbl ) 0 f ft;; l  ft  if 

t  f  c " 

wr  i  t  inj 

to  fill 

S  i  21  ■  1 1  ”  >  ; 

j=<); 

j  '  ■  l  f5  ; 

i  •  * ) 

or  tx 

0;  x<l 

2 8  ;  xm 

i 

i 

>;i  1  28*  j 

*( 

semet  ( 

*  i  )  s 

1  11!  '  X  V"  j  , 

■’■  < 

e  te:- 

i  i  )  s 

1  m  '  x  ''li  4  -■'■ 

*( 

seine  t  e:- 

t  i  )  •; 

!  in  '  [2*i  ■•■■ 

( seme tex+i ) 


=  s  1  in  [  x  ]  [  i  +  'V"  j  j  ; 


} 

* (seme tex+0x801 ) =1 ; 


/ 

/ 


/ 


!  ->■ 


I 


/  '• 
/•< 
/■>■ 
/* 

/* 

/■' 

/■■ 

/-'< 


DISPTOP.C 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
SCENE  ONLY  DISPLAY  TO  THE  JOINT  TRANSFORM  CORRELATOR 
by  Capt  John  Cline 
August  31,  1989 

This  program  displays  onlv  the  scene  half  (upper  71x128  pixel:; 
the  TARGA  file  "display2 . tga"  onto  the  SLM.  This  program  is  p 
of  the  joint  transform  correlator,  and  is  run  after  the  scene 
template  have  been  displayed  together. 


"include  "stdio.h" 

- i nc 1 u de  "  s t r i ng . h " 

int  i,  j,  x; 

unsigned  char  slm[  128  ;  !  04  j  ,  Largabuf  for  [  1  28  '  '  128;  ,  temp  1  1  2.8 

FILE  -mi el; 

vo  i  d  ina  i  n  ( ) 

prepare_ s lm( ) ; 

/*read  in  scene  half  onlv-'/ 
f ilel  fopen("\\targa\\displav2 . tgn" , "rb" ) ; 
f seek ( f i le 1 , 7314,0) ; 

f  read  (&targabuf  fe l*  [  5  7  j  ;  0  ;  ,  1  ,  9088  ,  f  i  le  1  )  ; 
f  c 1 ose ( f i le 1 )  ; 

conve r t_targabuf fer_ to  t  emp( ) ; 
convert_temp  to_slm( ) ; 

>* i  te  to  s  1  m ( )  ; 


prepare  slmf  > 

char  f  ar  is t  lie •  ; 

seinetex  -•  (char  far  ■'■ )  OvbonuOoOO; 
(  seme  t.  ex  (0x800  )  1  ; 


( >  n.'.’e  f  t  I  arr.ahuf  f  er  to  (imps'  ; 

!  n  r  (  i  0  ;  i  •  1  2  8  ;  i  1  i  > 

for ( j -  0 ;  j •  128:  j  t  i  > 

l 

i  f  <  ;  a  rg-llji  iff  or'  I  ’  ■  ]  Oy.OO  )  t  mp  i  j  0;-;0  I  ; 


i 


else  temp [ i ] [ j ] =0x00 ; 


convert  temp  to  s  L m ( ) 

/'•^convert  2  pixels  into  ,m  e  ■  l  f’li  t:  hit  character  for  adds 

pr  int.  f  (  "c  reat  i  ng  S I  .M  format  \.n"); 
for (x=0 ;  x<128 ; "x+t ) 

I 

for(j=0;  j<16;  j+r) 
i 

s  1  m  [  x  J  ;  j  ;  -2* temp;  126 -8*j  ]  |xl  4- temp •  12/- 8* j  •  ’ 

s  1/n  [  x  j  [  4*j  + 1  j  -8*tomp  ’  1 24  -  8*j  ]  [  x  ]  1 4*temp  [  1 2  3  -  8*j 
s  1  in  [  x  ]  i  4*j  4  2  ]  =  32* temp  [122-  8* j  ]  [  x  '  t  16* temp  .  123  -  S 
s  1  in [  x ]  ;  4*  j  t-3  ]  =1  28* temp  [  120- 8* j  j  [ x[+64*temp[  121  - 


vrit.e  to  sltn() 


,/*Wr  i  te  the  SLM  arrav  to  t  he  Sl.M*/ 

c  It  a  r  f  a  r  *  s  e  m  e  t  e  x  : 

semetex  >•  (char  far  *)  tlxbOfiooOOO ; 


pr  i  tit.  f  ( "wr  i  t  i  nr, 

t  i  tiie  Si 31 

\  1 1 

for(j---0;  j<l6; 

i'h' 

£or(x--0;  x<l 

>8;  xm) 

i-xt 128* j  ; 


*( 

semetexti) 

S  1  It!  '  X 

*( 

seinetexti, ) 

-  s  1  ir 

;  i 

st' !K-:  ex  t  i  ) 

: .  1  in  ’  x  ' 

■  •> 

*( 

semefex  *  i  ) 

S  1  II!  ;  X  ' 

■  ) 

/ 

i 

*(  so-met  ex  40x801  )-l  ; 


/■•■  TAR2HLF .  C 

/■'-  AIR  FORCE  I. VST  I  TL'Th  OF  TECHNOLOGY 

/•••  PROGRAM  FOR  REDUCING  FILES  USED  IN  THE  JOINT  TRANSFORM 

by  Capt  John  Cline 

/'■•  August.  31.  l'LS1.) 

/  o  - 

/-•’•This  program  REDUCES  two  TARGA  tiles  "grabl  2 .  t  r.a"  and 
f  rom  256X256  to  128X1  28  and  stores  ’.lain  in  tlu-  TARGA  !  i 
•"•'r " grab  1  .  tga "  and  "top. tga"  r<  spec  t  i  \\  i  v  ,  Tlu-  ivdaction 
/  rcompl  ished  bv  averaging.  This  program  is  to  In-  visod 
/■'•'joint  transform  correlator. 


i  i:c  i  ude  "  s  t  d  i  o  .  h  " 
i  i’.c  1  ude  "  s  t  r  i  ng .  h  " 
i  tic  1  vide  "mn  t  h  .  h " 

inf  i ,  j ,  k ; 

unsigned  char  bufferin'  128’  '256  '  ; 
uns  i  gned  char  l»u H erovit  j  fy’t  :  '  128  : 
u::s  i  gned  ho  1  do r  ; 


targhead;  ; 

!  '  .  ;•:(  )t  i  ’  . 

'  ■  :•:')!> '  .  ' 

/■:' 

V  >  J  i  ' 

V  (  i  1 

'  :■:<>() '  .  ' 

xrc  '  . 

)u ' 

'  \  80'  . 

'  '■■fill'  ,  ' 

;  u  ’  , 

v(!il' 

•  vOH 

FILE  C'  f  i  lei  ,  '  !  idol  ; 

'.'nil!  mu  ini') 


ini  f  (  "  r  i  •  i 

i Mr  i  nr, 

f  i 1 es  r  a 

open  f  irt 

;t  pai) 

•  of  !  i  1  .  : ; 

1  o  1  --  f  O';".  T 

\  (  "  '■  t 

i  !"p.a\\  r.  rab 

1  ?  •  !  " 

lo2  lope! 

i  (  "  .  \  ;  • 

u'r.a'1  grab 

1  .  :  •  t”  ,  " 

hand  1  o  iioado  m 
t  ".o ok  (  1  i  i  .  1  .  i  /  ,  Mi; 
t  •••: rite  t  t  a  r  r.ht  .el ,  18,  1  .  f 

n  a..!  in  data,  iv'l'u  .  .  ,  nd  r  i  •  ,  i  •  . ; 

1  n  r  i  i  ■  fi :  i  ■  A  :  i  i  t  i 


I- 


i- . 


i 


'hut 


fwrite (buf ferout ,  8192,  1,  file?); 


fclose ( f ilel  )  ; 
fclose ( f i lo2 )  : 


/*open  second  set  of  files'-''/ 
filel=fopen( "\\targa\\top_2 . tga " , " rb" ) ; 
f i le2=f open ( "\\targa\\ top . tga" , "wb" ) ; 

/-'handle  headers*/ 

f seek ( f i le 1 ,  18,  0); 

fwr i te ( targhead ,  18,  1,  file/); 

/*read  data,  reduce,  and  write*/ 
for(i"0;  i<2;  i++) 

{ 

fread(buffer  in  ,  1,  3 2  7 1> 8  .  filel); 
for(j-0;  j < 1 2 8 ;  j+-2) 
i 

for ( k=0 ;  k<256;  k(=?) 

( 

ho  1 de r= ( bu f f e r i n [ j j [ k  j t bu f  f  e r  in ' j *  1 
+bufferin[  j  +  l  ]  [ k+ 1  ]  1 2  ) //* ; 
buf  fe  rout lj/2} [ k/2 j  =ho 1 der ; 
i 

) 

fwrite (buf ferout ,  8192,  1,  file/); 

i 

fclose(filel)  ; 
fc  lose  (  f  i  le.2 )  ; 


;  ;kj (buffer 


1 


JT-DIFF.C 


AIR  FORCE'.  INSTITUTE-:  OF  TECHNOLOGY 

/*  PROGRAM  FOR  BINARIZING  FRINGES  IN  THE  JOINT  TRANSFORM  CORREIA'*  iR  •*/ 


/>>  bv  Capt  John  Cline  ••/ 

August  31,  1 f) 8 9 

/  -  '■/ 

/'•This  program  binarizes  the  fringes  of  tEie  JTC  by  finding  the  mean  */ 
/•'difference  between  the  joint  transform  file  "grabl.tga"  and  the  */ 
/••Fourier  transform  of  the  scene  file  "top.tga”,  and  using  it  as  a  */ 
/-<■  threshold .  If  the  difference  is  greater  than  the  threshold  the  •■/ 

/■'-pixel  would  be  on,  if  less,  the  pixel  is  off.  The  TARGA  file  */ 

/'•’-"binary .  tga"  is  saved  with  the  binary  version  of  the  fringes,  and  *  / 
/•'•the  SLM  is  appropriately  written  to  for  tlie  next  step  of  the  'T1'. 


-include  "stdio.h" 
-include  "string. h" 
-include  "math.h" 


unsigned  char  targhead [ 18 ■ ,  slm ■ 128 ] [ 64 ] ; 

unsigned  char  joint  [ 1 28  j [ 128 [  .  ta r gabu f  f  e  r  [  1 2  8  ]  ( 1  2  8  j  ,  temp  •  1  r  S  1 ; 
int  maxvalue,  i,  j,  x,  v.  col.  row,  index: 
float  combined,  thrshld-O; 

FILE  ■-'•- file! ; 

void  main() 

I 

prepare_slm( ) ; 

/"get  joint  transform  file*/ 
filel=fopen( "\\targa\\grabl . tga" , " rb" ) : 
printf ( "\n\nreading  in  data  \n"); 

fread( targhead ,  1 , 18  ,  f  i lei )  ;  /•■rend  header*/ 

f read( j oint , 1 , 16384 .file]): 
fc lose ( f i lei )  : 

/■•'-get;  scene  only  file*/' 
f i le l=fopen( "\\targa\\top . tea" . " rb" ) ; 
f  seek ( file!  ,18,0): 
f read( targabuf fer , 1 , 16384 , fi lei ) ; 
f  c  1  o  s  e  (  f  i  1  e  1  )  ; 

/’"•calculate  threshold  bv  finding  average  difference*/ 
f  o r ( row-0 ;  row< 1 ? 8 ;  row t f ) 

i 

1  or ( col  0 ;  co 1 < 1 98 ;  colli  ) 

( 

t  b rsti  1  d  t  joint  ;  row  ;  rnl  -to rgabu f  f  e  r  row  1  [col  :  ; 


i 


thrshld=chrshld/16384  t  2 ; 


/^binarize  pixels  based  on  threshold  for  difference 
p r i n t  f ( " b ina r i z i ng  da t a  \n " ) ; 
for (row-0;  row<128;  rowii) 

( 

for(col=0;  col<128;  col+t) 

1 

combined- joint [ row ] [col ] - targabuf  f e r [ row ] [  co 1 
i f (combined<=thrshl d) 

( 

targabuf for [ row] [col j =0x00 ; 


else 


targabuf for [ row] [col ;=0xff  ; 

! 

1 


/“'save  binarized  version  */ 
filel=fopen( "\\targa\\b :  a rv . tga " , "wb" ) : 
fwrite ( targhead ,  18,  1,  fi’el); 
fwr: te(targabuf for ,  16384.  1,  filel) ; 
fclc?e(filel ) ; 

conve r t_ ta rgabu f f e r  to  tempi); 
convert _U mp_to_slm( ) ; 
wr i te  to  s 1 m (  )  ; 


prepare_slm( ) 

( 

char  far  *somotox; 
semetex  =  (char  far  *)  OxbOOOOOOO; 
( seme  tex+0x800)  =  1  : 


convert  targabuf for  to  tempi) 

f  or ( i=0 ;  i <128 ;  iff) 

) 

for ( j -0 ;  j < 1 2 8  ;  j  +  t) 

{ 

i.  f  ( targabuf  for  [  i  [  [  j  ]  =  0x00)  t  emp  [  i  j  !  j  ]  -  0x01  ; 
e 1 se  temp [ i ] [ j ] =0x00 ; 


converttemp  to _ 3 1m (  ) 

! 

/'""convert  2  pixels  into  an  eight  bit  character  for  addressing  the  Si.’!'/ 

printf ("creating  SUM  format  \n"); 

£or(x=0;  x<128:  xt  +  ) 

i 

£or(j=0;  j<16;  j++) 

I 

slm [ x ]  [ 4*j j  =2 * temp [ 126  -  8* j ] [ x ] t- temp [ 12  7-8 * j ]  [ x ] t 2 32 ; 
s  lm  [  x  1  [  4*  j  +1  ]  =8*  temp  [  1 24  -  8*  j  ]  [  x  ]  -t  4* temp  [125-  8* j  ■  [  x  ;  t  24  3  ; 
slm  [  x  ]  [  4  j  +2  ]=3 2* temp  [  122  -  8* j  j  [  x  ]  +  16* temp  [  12  3  -  8*  j  j  [  x  ]  t  20  ,  ; 
slm  [  x  j  [  4*j  +3  ]  =128*temp  [  120  -  8*j  ]  [  x  ]  +  64* temp  [121-  8*j  ;  [  x  ;  +r>  5 : 


v r  i  t:e_to_s  1  m  (  ) 

; 

/"-Write  the  SLM  array  to  the  SLM*/ 
c h a  r  f a  r  *  seme  t  ex ; 

semetex  =  (char  far  *)  OxbOOOOOOh ; 
printf  ( "writing  to  the  SLM  /  ■"); 
for ( j  =0 ;  j <16 ;  j++) 


for(x=0;  x<128;  x++) 


i=x  tl28*j ; 

* ( seme  tex  t i ) 
* ( semetex t i ) 
*( seme text  i) 
*( seme  text i) 


s  1  in  [  x  ]  (  4*j  ]  ; 
slm [ x ] [ 1 1 4*j |  ; 
slm [ x  j  [ 2  1 4*j ] : 
s  1  m  [  x  ]  [  3-t  4*j  ]  ; 


*f semetextOxSOl )=] ; 


I  K ') 


/*  TAR2HLF2 . C 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  FOR  REDUCING  FILES  USED  IN  THE  JOINT  TRANSFORM  CORREIAT-R 
/*  by  Capt  John  Cline 

/■'•  August  31,  1989 

/•'•This  program  REDUCES  the  TARGA  files  "grab2_2 .  tga"  from  320/23G  i  o 
/••160X128  and  stores  it  in  the  TARGA  file  "grab2.tga".  The  roduct  ion 
/*is  accomplished  by  averaging.  This  program  is  to  be  used  in  the 
/■•joint  transform  correlator. 


~ include  "stdio.h" 
-'include  "string. h" 
-  include  "math.h" 


i  n  t  i  ,  j  ,  k ; 

unsigned  char  buf fer in[ 160 ] l 256 j ; 
unsigned  char  buf ferout [ 80 ] [ 1 28 J ; 
unsigned  holder; 

char  targhead[ ]  =  I’\x00',  '\x00' 

'\x00',  ’ \x00 ’ , 

'  \:<80 '  ,  '  \x00 '  , 


'  \\03 '  ,  '  \x()0 '  ,  '  \>:00 ' 
’ \x00 ’ ,  ' \x00 '  ,  ' \x00 ' 
' \xa0 ' ,  ' \x00 ' ,  ' \x08 ' 


FILE  *filel,  *  f  i  1  e  2 ; 

void  main() 
i 

printf ( "\n\nreducing  files\n\n") ; 

/*open  files*/ 

f ilel=fopen( "\\targa\\grab2_2 . tga" , " rb" ) 
f ile2=fopen( "\\targa\\grab2 . tga" , "wb" ) ; 

/*handle  headers*/ 

fseek( f ilel ,  18 ,  0) ; 

fwrite ( targhead ,  18,  1,  f i ] e  2 ) ; 


/■-•read  data  in.  reduce,  and  wr  i  t  e*/ 
f o r ( i ’0 ;  i <? ;  i  ♦  i  ) 

{ 

f read(bul fer i n .  1,  A0960.  filel); 
for ( j  =0 ;  j<160;  j  t  •  2 ) 

( 

f o r ( k - 0 ;  k<2  56;  kf-2) 


hoi de  r  ( buf fe  r i n [  j  j  [ k ’ t buf  f e  r i n '  j 1 1  1 [ k ] t  bu f  f e  r i n ;  j  ■ 
♦■buf  f e  r  i n !  j  1 1  j '  k  t  1  '  t  2  )  /■'*  ; 
bvi  f  fe  rout  [  j  /?  j  [  k/2  j  -  ho  1  tie  r  ; 


fwr  ite  (buf  ferout ,  10240,  1,  file-2); 

) 

fclose(filpi  )  ; 
f c lose ( f i le2  )  ; 


18/ 


/*  CAL2 - HF .  r 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PEAK  LOCATOR  FOR  CALIBRATING  THE  JOINT  TRANSFORM  CORRELATOR 
/'-  by  Capt  John  Cline 

/*  August  31,  1 989 


/'"This  program  finds  two  maximum  valuer;,  a  top  half  value  and  a 
/-‘bottom  half  value,  and  their  coordinates  in  the  TARGA  file 

grab2  .  tga"  .  It  then  modifier  trie  calibration  file  "cal.dat"  to 
/'“include  these  new  values.  The  program  BUl.L-HF.C  uses  "cal.dat"  to  '■ 
/“interpret,  results  from  the  joint  transform  correlator.  Bv  relating* 
/'“'scene  annuli  locations,  known  apriori  and  created  with  the  program  '-'A- 
/“CAL1-HF.C,  to  their  corresponding  correlation  peak  locations  in  t!u-* 
/-'•'file  "grab2.tga"  created  by  running  the  joint  transform  correlator.-', 
/*the  JTC  can  be  calibrated  to  properly  interpret  target  locations 
/*within  arbitrary  scenes. 


“include  "stdio.h" 

" i nc 1 ude  " s  t  r i ng . h " 

i nt  i , j ; 

unsigned  char  targabuffer [ 160 ’ [ 128 j  ; 
unsigned  char  cal  da  ta  [ 4  ]  [4  ]  ,  corner  |  1  ]  : 
unsigned  int  tcpx^O,  topv-0,  topvalue=0.  corn; 
unsigned  int  botx=0 ,  botv=0,  hot  value*-!); 

FILE  “ f  i  1 e 1 ; 

ma  ini"  ) 

pr i nt f( ” reading  in  data  \n"); 

/'••go  t.  red  f  i  1. <•'•'*/ 

f.  i  le  1  1  open(  "\\targa\\grah2  .  tga"  .  "rh"  )  ; 
fseek( f i 1 e 1 , 1 8 , 0) ; 
f read( targabuf for, 1 , 20480, f i lei  )  ; 
f  c lose ( f i lei  )  ; 

/“get.  cal  data  file*/ 

f i le 1 - fopen( "\\turc\\ca 1 . da  t " . " rb” ) ; 
f  road ( c  a  Ida  ta ,  1  , 1 6  ,  f  i  1 e 1 )  ; 
f  read ( corno r , 1 , L , f i 1 e 1 ) ; 
f.c  1  osfc  (  f  i  lei)  ; 


pr int  f ( "4d\n" , corne r [ 0  j  +  1 ) ; 
for ( i =0 ; i<4 ; i++) 

) 

printf("*d  > d  ",caldata[ i  ]  [Oj  ,  caldataf  i  j  [  1  j  )  ; 
pr  i  n  t:  f  (  "  *d  *d\n”  ,  ca  1  da  t  a  [  i  ]  j  2  ]  .cal  da  t  a  [  i  j  [  5  ]  )  ; 


1  88 


/-'locate  max  value  on  the  bottom*/ 
for(  1-0 ;  i<45  ;  i  t  (  ) 


for ( j  =  0 ;  j<  1/8 ;  j  t  +  ) 

( 

if  ( targabuf for [  i  ] [j  ;  >  hot value) 

1 

bot.value-targabuf  for  [  i  j  [  j  ;  ; 
botx=  j : 
boty=i ; 

) 

) 


/"locate  the  max  value  on  the  top---/ 
ior(i=llb;  i  <  1 6  0  ;  i  a- 1  ) 

f  or  ( j  =0  ;  j  <r  128  ;  i  t  t  ) 

{ 

if  ( targal.uf  fer ]  i  :  ■  j  !  >  topvalue) 
( 

topvalue-targabuf  ter'  i  j [ j  '  ; 
to px= j ; 
t  opy=-  i  ; 


corn=( unsigned  int ) corner [ 0 ] : 
caldata  [corn]  [  0  }  *=  ( mis  igned  ehnr)topx; 
cal da ta [ corn ] [ 1 ] - (uns i gned  cha r ) topv ; 
ca  Ida  t a  [  corn  ]  [  2  ]  -- ( uns  i  gned  char ) botx  ; 
ca Ida  ta [ corn  j [ 3  j  =  (uns i gned  char )bofy ; 

if(topx-0  f«L  t.opy==  130)  print  f  (  "\nRUN  THIS  ONE  AGAIN  !! \n\n"  ) 
if(topx<=73  £<&  topx>=ri3)  print f("\nCHECK  ALIGNMENT  !! \n\n"  )  ; 
i  f  ( bo t:x<  =  7 3  &&  botx>- 63)  pri ntf  (  "\nGHF.GK  ALIGNMENT!  !\n\n")  : 

p r  i  rtt  f  ( "  hi\n"  .  corne r  [  0  ]  )  ; 
for (  i -0 ;  i<4 ;  i  t  t ) 

pr  i  nt  f  (  ”  id  *  '.I  "  ,  ca  1  da  t  a  i  [  •'  o  ]  ,  ca 1  da  t  a  ■’  i  ’  [  1  >  ; 

print:f("*d  »d\n"  .  ca  1  da  t  a  :  i  ]  [  3  [  ,  caldata.  i[;  ’  ); 

f  i  1  c- 1  =  f  open  (  "\  \  t  u  rc\\ca  1  .  da  t  "  .  "wU  "  )  ; 

fv  r  i  t:  e  ( c  a  1  da  t  a  .  16,  1  ,  f  i  I .  !  )  ; 

fwr i te (corner ,  1.  1,  file]); 

fclose(filel)  ; 

printff "press  anv  Lev  to  continue"); 


1  86 


getch() ; 

) 


i  «i0 


riRC-HF.o 


air  • : 'R'  i:  ;n:  : ; : •  : s  of  if  •  •.  v 

!MT  I  DISRI.AV  Ri  >R  TKSTI  AIK  !•  •  •  NT  A'A‘.:>  !A  >  !■::■!  o<.Ri 


■Aids  din  h 


.Ad  i.  j,  k. 

;  i  >  ■ :  r  r.iil 

*  .  .  i  *  X  1  t  ■  t  f  - 

'  '  .  v ' 1  :  '  ' 

1 ::  i  /I  Is  d  I’ !  .,1  r  A  ;;  ;  /  ■  I,  ,  :  :  .  i ;  I' : :  !  I  ;■  !  1  -  .  :  .  !J| ; . 


i  ill  !!M  i  n  i  I 

p  repa re  s  1  ni  i  '  : 

a t  o  i  re  I  «•  oionii  is  i  .•••.  .ini  i ■  a  i  i  1  < 
p r i n t f ( " Hnt e r  c  i  tv  1 «  .  •  : ■  r  ,-nord  i  nut  t  a  . 

!  us  i  vo "  )  : 

print  1  (  "'.n.uicl  vo  he 1  wo'ii  i  i  and  >*  inelusiv. 
print  f  ("1'intt.  r  >:r  (must  !><•  .  ■  1 1  m;,  i  A  n”  . 
rc an !  (  "  *< ! ”  ,  )  : 

print  t  (  "lint  <  r  vo  (must  In-  . .  t  i  i  nt  i  r.«.  ■  r  '  ’  >  : 

so  anf  t  "  *  1 1 "  ,  sSvo  '  ; 

pr  i  nt  f  (  "ra  1  on  1  at  •  uj-\  n"  )  ; 

/-write  tile  re  f  e  retire  e  i  re  1  e 
for  (col  At)  ;  enl<(VI;  eoltt'l 

fori  row  !'A  rowolOH;  i  nw  i  i  i 
t 

t  os  t  (  row  -  vre  i  )  (  row  -  vr  e  i  )  t  i  cn  1  -  l'e  t  !  ' a  eo  1  -  r  s  ; 

i  f  f  t  e.s  t  <  nut  rads(|uan  (1  V<  test  i  nr.ii!.r.'|u,iivi!  ) 
t  a  ry, ah1  if  f  e  r  {  1  '?  ■'  -  row  1  rn  1  /  V>  ; 


•vr  it.-  r ho  t  arr.»- :  c  i  it  1 .  . 

!  o  r  t,  to  1  -  ;  co  i  ■  :-:c  *  i  ;  nii  t  i 

t  or  y  row  vr  -  .  :  rov-  vc  t  y  ;  row  t  t  > 

t  i  row  -  -,-i' )  i  mv-vc  ■  t  •  nil  ->:c  i  ■,  col  -  : 

i  f  i  ;  i  s'-  o-ti  r.-i(l!:*]'u-i  *•(•<!  rc"ii  '  •  j.  r.r  ■<!•••*  j  • .  •  r.  •: 


*•  i :  a  i '  iimt  i  i-  r  ;  o  1 1 :  1  av.! 

c  n::v.’  r  t  t  a  r ■  1  •  ’  1 1  f .  ■  r  to  t  *-:rp 

I '  o;  r  t  t  f-ll’P  to  ;;  )  ip  i  I  ; 


convert,  temp  to  slim'  ) 

/"••convert:  ?  pixels  into  an  »•  i  pjil  hi:  -  i ; ;  a  •  •  r  :  ;  'Mr 

printf  ("creat  ini',  SLM  iormat  n"  ;  : 
for  (X“<> :  :■:<  1^8  :  :•:(  t  > 

( 

for  ( j  -  () :  j  <1  h  ;  j  +  t  ) 

{ 

S  111:  '  X 
S  1  111  ’  X 
S  1  II!  .  v 

slm'  x 


vr  i  t  e _ Co  _s  1  in  (  ) 

/'■'Write  the  SLM  arniv  to  the  SLM ' 
cliar  far  ''seme  t.  ex  ; 
seme tox  =  (char  far  ••'•  ,i  Oxha-ir 
print  t  (  "vr  i  *  i  nr,  to  the  Si.'l 
for  i  j  u  ;  j  •:'  1  (> :  i  t  t  > 

f  o  r  (  y.-ti ;  1  h  8  ;  t  i  ; 

i  :•:»  1 1>8  --  i  : 

*  (  st- me  1 1  x  »  i  )  s  1  in 
*( some fox* i  >  -  s 1 m 
"•'•■(  seme  t  ex  t  i  )  «*  slm 

*  (  seme  tex  t  i  )  --  s  1  m 


i  Sellett  xt('x8(U  )  1 


a  j  : 
1  i  ,  i 


/*■ 

/* 

/*!c 

/ 

/* 
/* 
/* 
/* 
/* 
/'- 
/  ' 
/'• 
/’ 
/’ 
/■ 
/'• 
/’ 

/  ‘ 
/•• 
/’ 
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BULL-HF .  C 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CORRELATION  PLANE  INTERPRETER  FOR  THE  JOINT  TRANSFORM  CORRELATOR 

by  Capt  Joht  Cline 
" August  31,  1989 

This  program  finds  the  top  10  values  in  the  top  and  bottom  cross  - 
correlation  regions  of  the  joint  transform  correlator  correlation 
plane  file  "grab2.tga".  It  rewrites  the  correlation  plane  file 
with  crosshairs  at  peak  locations  in  the  cross  correlation  regions 
to  the  file  "max.tga".  Next,  it  uses  these  max  values,  along  with 
earlier  calibration  values  stored  in  "cal.dat",  to  calculate  the 
coordinates  of  the  target  in  the  original  scene.  (This  data  is 
displayed  on  the  computer  monitor.)  Having  done  this,  the  original 
scene  file  ( "displav2 . tga)  is  rewritten  with  crosshairs  at  flu- 
target  location  as  "bullseye . tga" . 


-include  "stdio.h" 

^include  "string. h" 

^include  "math.h" 

int  i,  j,  k,  toptest=0,  bottest=0,  xb [10],  yb[10 
int  ii,  jj ,  ilow,  ihigh,  jlow,  jhigh; 
unsigned  char  targaheader ( 1 8 ] ,  targa ( 160 j [ 1 28 ] 
unsigned  int  topx[ll],  topv [11],  topvalue [ 11 ) ; 
unsigned  int  botx[ll],  botyfll],  botvalue [ 11 ] ; 
unsigned  char  caldata [4 ] [ 4  ] ; 
float  cal[4][4],  xx ,  vy ; 

iloat  xl ,  x2  ,  vl,  y2  ,  xfb[  10]  ,  xft[  10]  ,  vfb'1.0 


xt[  1 0  j  ,  v t.  j  1 0  j  ; 
outhufferf 128  j [ 128 ]  ; 


v(: ' 10  ; 


FILE  *filel; 


void  main() 

! 

i 

/* initialize  values*/ 
for( i=0 ;  i< 1 1 ;  i++) 

1 

topx [ i ] =0 ; 
topy [ i ] =0 ; 
topvalue [ i ) =0 ; 
botx [ i]  - 0 ; 
boty [ i ] =0 ; 
botvalue [ i ] =0 ; 


/*get  ccd  file*/ 

filel=fopen( "\\targa\\grab2 . tga" .  "  rb"  )  ; 
fread( targaheader , 1 , 18, filel) ; 
printf ( "\n\nreading  in  data  \n"); 
f read ( targa , 1 , 20480 , f i lei )  ; 


fclose(filpl)  ; 

/*get  cal  data  file*/ 
f ilel=fopen( "\\turc\\cal . dat" , "rb" ) ; 
fread(caldata,l,16,filel) ; 
f close ( file  1 )  ; 
for(i=0;  i<4 ;  i++) 

( 

for(j=0;  j <4 ;  j++) 

( 

cal [ i ] [ j ]=( float ) cal data [ i ) [ j  j ; 

} 


/*erase  center  autocorrelation  section*/ 
for ( i=45 ;  i<l 15 ;  i++) 

{ 

for(j=0;  j <1 2 8 ;  j  +  +  ) 

{ 

targa [ i ] [ j ] =0x00 ; 

1 


/*locate  the  10  max  values  on  the  top*/ 
for(i=115;  i<160;  i++) 

( 

for(j=0;  j < 1 2 8 ;  j+  +  ) 

{ 

i f ( targa [ i] [ j ]>=100) 

( 

if ( toptest<10)  toptest++; 
k=9 ; 

whi le ( targa [ i ]( j ]  >topvalue[k]  &&  k>=0) 

( 

topvalue [ k+1 ]=topvalue  [  k ]  ; 

topx[k+l ]=topx[k] ; 

topy [ k+1 ] =topy [ k ]  ; 

topvalue [ k  j  =  targa [ i] [j  j ; 

topx[k]=j ; 

topy [k]=i ; 

k-  - ; 

) 


/*locate  10  max  values  on  the  bottom*/ 
for(i=0;  i<45;  i++) 

I 

for ( j=0 ;  j <1 28 ;  j  t  + ) 


i  f (targa [ i ] [ j ]>=100) 


if (bottest<10)  bottest++; 
k=9  ; 

while  ( targa  [  i  ][  j  j  >botvalue[kj  &&  k>  0 ) 
( 

botvalue [ k+1 ] =botvalue [ k ] ; 
botx[k+l ]=botx[k] ; 
boty [ k+1 ] =boty [ k] ; 
botvalue [k]=targa[ i] [ j ] ; 
botx[k]=j ; 
boty [k]=i ; 

k--  ; 

} 


) 


) 


/'-write  file  with  crosshairs-/ 
for(j=0;  j<bottest;  j++) 


for(i=-3;  i<4 ;  i++) 

( 

targa [boty [ j ] +i ] [ botx [ j ] ] =0x00 ; 
targa [ boty [ j ] ] [botx [ j ] +i ] =0x00 ; 


for(j=0;  jctoptest;  j++) 

< 

for(i=-3;  i<4 ;  i++) 

{ 

targa[topy[j ]+i] [topx[j ] ]=0x00; 
targa [ topy [ j ] ] [ topx [ j ] +i ] =0x00 ; 

) 

1 


printf ("writing  correlation  file\n"); 
filel=fopen( "\\targa\\max . tga" , "wb" ) ; 
fwrite ( targaheader , 18 , 1 , f ilel) ; 
fwr i te ( targa ,2 04 80,1, filel); 
fclose(filel) ; 

/'-This  part  of  the  program  finds  the  location  of  the  target  given  the 
/'-location  of  the  correlation  peak.  It  puts  cross  hairs  on  the 
/-'original  scene  file. 

/*read  in  the  original  scene  file*/ 
printf ( "reading  in  original  scene  file\n"); 
f ilel =f open ( "\\targa\\display2 . tga" , " rb" ) ; 
fread( targaheader ,  1,  18,  filel); 
fread(targa,  1,  16384,  filel); 
fclose (filel) ; 

/*calculate  the  target  coordinates  based  on  the  values  in  tin 
/*upper  correlation  of  the  calibration  data 
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pr int f ( "calculat ing  target  locat ion\n" ) ; 
for(i=0;  i<toptest;  i++) 

{ 

xl=(113/(cal[l] [ 0 ] -cal [ 0 ] [0]) )*( topx [x] -cal[0j [Oj )+7 
x2=( 113/ (cal [3][0]-cal[2][0]))*( topx[ i] -cal [ 2 ] [  0  ]  )  t  7 
yl-(  30/(cal  [  0 ]  [  1  ]  -cal  [  2  ]  [  1  ]  )  )*(cal  [  0  ]  [  1  ]  -  topy  [  i  ]  )  4-34 
y2-(30/(cal[l] [1] -cal [3] [ 1 ] ))*(cal [ 1 ] !1] -topy[  i]  )  +  34 
xft[i]-(((((yl+y2)/2)-34)*(x2-7) 

+  ((64-<(yl+y2)/2)))*(xl-7))/30)+7; 
yft[i]”(((((xl+x2)/2)-7)*(y2-34) 

+  ((120-((xl+x2)/2)))*(yl-34))/U3)+34; 
xt [ i ] “(unsigned) (xf t [ i ] + . 5) ; 
yt [ i ]=( unsigned) (yft [ i ]+ . 5) ; 


/^calculate  the  target  coordinates  based  on  the  values  in  the 
/-lower  correlation  of  the  calibration  data 
for(i=0;  icbottest;  i++) 

( 

xl=(113/(cal[0] [ 2  3 -cal [ 1 ] [2] ))*(cal[0j [2] -botx [ i ] )  +  7 : 
x2=(113/(cal[2] [2] -cal [3] [2 } ) )*(cal[2] [ 2 ] -botx! i ] ) + 7 ; 
yl=(30/(cal [ 2 ] [ 3  J -  cal [ 0 ] [3]))*(boty[i]-cal[0] [ 3 ] )+34 ; 
y 2= (30/ (cal [3] [3] -  cal [ 1 ] [3] ))*(boty[ i] -cal[ 1] [3] )+34: 
xfb[i]=(((((yl+y2)/2)-34)*(x2-7) 

+  (64-((yl+y2)/2))*(xl-7))/30)+7; 
yfb [ i ]“( ( ( ( (xl+x2)/2) - 7)*(y2 -  34) 

+  (120-((xl+x2)/2))*(yl-34))/113)+34; 
xb [ i ] “(unsigned) (xfb ( i ]+ . 5) ; 
yb [ i ] “(unsigned) (yfb [ i ] + . 5 ) ; 


eliminate_redundant  ( )  ; 
eliminate_stray ( )  ; 
save_segmented_vers ion( )  ; 

/*write  file  with  Xs  on  weighted  background  at  target  location 
for(k“9;  k>=0 ;  k- - ) 

( 

ii=0 ; 

for ( i=123 -yb [k ] ;  i<132-yb[k] ;  i++) 

{ 

j  j=0; 

for(j=xb[k] -4;  j<xb[k]+5;  j+t) 

( 

targa [ i ] [ j ] =botvalue [ k ] ; 

jj  ||  ii==8- j  j  )  targa  [  i  ][  j  ]  =0x00 ; 

j  j++; 

) 

i  i++ ; 


ii-0; 

for(i=123-yt[k] ;  i<132-yt[k|;  i++) 


19/ 


for(j=xt[k] -4 ;  j<xt[kjt5;  j  «  » ) 

( 

Carga [ i ] [ j  ] =topvalue [ k ] ; 

if ( ii==j j  (I  i i==8 - j  j )  targa [ i ] [ j ] =0x00 : 

jj++; 

ii++ ; 


f ilel=fopen( "\\targa\\bul lseye . tga" , "wb" ) ; 
fwrite ( targaheader ,  18,  1,  filel); 
fwrite ( targa ,  16384,  1,  filel); 
fclose(filel) ; 
for ( i=0 ;  i<10;  i++) 

( 

pr  intf  (  "  %u\t%u\t%u\t%u\t%u\t%u\n"  ,  xt  (  i  ]  ,  yt[i],  topwiiu  /i  i 

xb[i),  yb [ i ]  ,  botvalue;!’) 


princf ( "press  any  key  to  continue"); 
getch() ; 


/ ' k  k  kk  kk  kk  kk  k  k  k  k  kk  k  k  k  k  k  k  k  k  k  k  k  k  k 

e 1 iminate_redundant ( ) 

( 

/"'eliminate  some  redundant  marks*/ 
for(k=9;  k>0 ;  k--) 

( 

for ( j  =k- 1 ;  j >=0 ;  j--) 

{ 

if (abs (xf t ( k] -xf t [ j ] )<=5  &&  abs (yf t [ k ] -yf t [ j ] )<=5 ) 

{ 

i f ( top value [ j ] <25 1 )  topvalue [ j ] +=5 ; 
else  topvalue [ j ] =255 ; 
xt [ k] =0 ; 
y  t [ k ] =0 ; 
topvalue [ k] =0 ; 

1 

if (abs (xfb [ k] -xfb [ i ] )<=5  &&  abs (yfb [ k] -y fb [ j ] )<=5 ) 

( 

if (botvalue [ j ] <2 51)  botvalue[j]+  =  5; 
else  bo tvalue [ j ] =2 5 5 ; 
xb [ k ] =0 ; 
yb [ k ] =0 ; 
botvalue [ k] =0 ; 


/-k-k  'k-k  'k'k  'kk  kk  kk  kk  kk  • k  k  k  kk  kk 

eliminate_stray() 


for(k=9;  k>0 ;  k--) 

{ 

j-9; 

while ( (abs (xft [ k ] -xfb [ j ] )>5  jj  abs  (yf  t  i  k  ]  -  yfb  [  j  ;  )>5 )  &&  j  > --  0 .) 
{ 

j  -- : 

if ( j  <0 ) 

( 

xt [k] =0 ; 
yt[k]-0; 
topvalue [ k ] =0 ; 


j=9; 

while ( (abs (xfb [ k ]- xft [ j j )>5  ||  abs  (y  fb  [  k] -yf  t  [  j  ■  )>5)  j>=0) 


j--; 

if  (j<0) 

{ 

xb [ k]=0 ; 
yb [ k ] =0 ; 
botvalue [ k ] =0 ; 

) 

V 

/ 

) 


/'k'k  k'k  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 

save  segraented_version( ) 

( 

for(i=0;  i<128;  i++) 

( 

for ( j=0 ;  j <12 8 ;  j++) 

{ 

outbuf fer [ j ] [ i ] =0x00 ; 

1 


j low=0 ; 

for(j=10;  (j<24  &&  jlow==0);  j++) 

( 

for ( i  =  32  ;  i<97;  i++) 

( 

if ( targa [ j ] [ i ] ! =0)  jlow=24-j; 


jhigh=0 ; 

for(j=38;  (j>24  &&  jhigh==0) ;  j--) 
{ 

for ( i=32 ;  i<97;  i++) 
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if ( targa [j ] [ i ] ! =0)  jhigh=j-24; 

} 

) 

ilow=0 ; 

for(i=32;  ( i<64  &&  ilow==0) ;  i++) 

I 

for( j=24- j low;  j<25+jhigh;  j++) 

{ 

if ( targa [ j ] [ i ] !=0)  ilow=64-i; 

) 

] 

ihigh=0 ; 

for(i=96;  ( i>64  &&  ihigh==0) ;  i--) 

( 

for(j=24- j low;  j<25+jhigh;  j++) 

! 

if ( targa [j ][ i ]! =0)  ihigh=i-64; 

} 


for(k=0;  k<10;  kf+) 
i 

i f ( xb [ k ] ! =0  &&  yb[k] !=0) 

( 

ii=xb [k] - ilow- 5 ; 
if(ii<0)  ii=0; 
j j=(128-yb[k] )-jlow-5; 
if ( j j<57)  j j=57 ; 

for(i=ii;  i<xb [ k ] +ihigh+6  &&  i < 1 2 8 ;  i++) 

{ 

for(j=j j ;  j<(128-yb[k] )+jhigh+6  &&  j < 1 2 8 ;  j++) 
{ 

outbuf fer [ j  j [ i ]=0xf f ; 

) 

) 

) 

if (xt[k] !-0  &&  y t [ k] !=0) 

{ 

i i-xt [ k ] - i low- 5 ; 
if(ii<0)  i 1=0 ; 
j  j  =  U28-yt(kj  )  -jiow-5; 
if ( j j<57)  j  j  =57 ; 

for(i  =  ii;  i<xt[k]  +  ihigh+6  6cb  i  <  1 2  8  ;  i+4) 

( 

for(j=jj;  j<( 128 -yt [ k ] )+jh igh+6  &&  j < 1 2 8 ;  jtt) 
! 

outbuf fer [ j ] [ i ] =0xf f ; 


) 

\ 

for(j=0;  j < 1 2 8 ;  j++) 


( 

for(i=0;  i <5  5 ;  i++) 

{ 

outbuf fer [ i ] [j ]=targa[i] [j ] ; 

) 

for ( i=57 ;  i<128;  i++) 

( 

outbuf fer [ i ] [ j ]=outbuf fer [ i ] [ j ]  &  targa[i][j] 

} 

) 

f i 1 ol =fopen( "\\ targa\\segment . tga" , "wb" ) ; 
fwrite ( targaheader , 18,l,filel); 
f write (outbuf fer , 16384, l.filel); 
fclose(f ilel)  ; 


/'k'k'k'k'k'k'k'k'k'k'k'k'k'k'kik'k'k'k'k'k'k'k 'k'k'Jc'k 'k'k 'kit's: 'k'k'k  -k  'k  'k  'k  ~k  'k  'k  'k  ~k  ~k  'k  'k  ~k 


201 


/*  DIS-HF.C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  INPUT  DISPLAY  TO  THE  JOINT  TRANSFORM  CORRELATOR 

/*  by  Capt  John  Cline 

/*  August  31,  1989 


/'■This  program  combines  two  targa  files,  a  45x128  pixel  scene  and  a 
/*45xl28  pixel  template,  to  form  a  single  file  "display2 . tga" .  The 
/'-'•template  is  written  to  TARGA  rows  10  through  54,  and  the  scene-  to 
/'"TARGA  rows  57  through  101.  The  remaining  areas  of  a  128X128  arrav  * 
/"'are  left  as  zeros.  BOTH  TARGA  FILES  MUST  BE  BINARIZED  VERSIONS  ’  * 

/"SUCH  THAT  ONLY  PIXEL  VALUES  OF  0X00  AND  0XFF  EXIST.  After  storing  * 
/"the  file,  the  array  is  converted  to  SLM  format  and  displayed  on  the* 
/'"SIM . 


/ 


» include  "scdio.h" 
“include  "string. h" 


i  n  t  i  ,  j  ,  x  ; 

unsigned  char  slm[  128  J  [  64  ]  ,  targabuf  fer  [  128  ]  !  128  j  ,  tcinp(  128  |  •  128  ]  ; 
char  f i lename [ 2 56 ] ,  f i lename2 [ 256  ]  ; 


char  targheadf ]  =  (  '\x00'  , 

' \x00 ' , 

'  \x03 '  , 

'  \x00 '  , 

'  \x00 '  , 

'  \x00 ' 

' \x00 ' , 

' \x00 ' , 

'  \x00 '  , 

'  \x00 '  , 

'  \x00 '  , 

'  \x00 ' 

' \x80 ' , 

'  \x()0 '  , 

'  \x80 '  , 

'  \x00 '  , 

'  \x08 '  , 

'  \x00 ' 

FILE  * f i 1 e 1 ,  * f i 1 e 2 ; 

void  main() 

/ 

\ 

prepare  s  1  in ( )  ; 

/*read  in  template*/ 

printf ( "Enter  file  name 

and  .ext 

of  template  fil 

e " )  ; 

printf("  (in  \TARGA  directory) .\n" ) ; 
scanf("%s",  filename); 

sprint f ( f i lename 2 , "\\targa\\%s " , f i lename) ; 
filel=f open (file name 2, "rb" ) ; 
fseek( f ilel , 18,0) ; 

f read (&targabuf fer [ 10 ] [ 0 ] , 1 , 5  760 , f  i  lei ) ; 
fclose(filel  )  ; 

/*read  in  scene*/ 

printf  ( "Enter  file  name  and  .ext  of  scent'  file"); 
pr intf ( "  (in  \TARGA  di rectory ). \n" ) ; 
scanf ( "%s"  ,  f i lename) ; 

sprintf(fi  1  e  tin  me  2  ,  "\\ targa \\%s  "  ,  f  i  1  ename  )  ; 
filel=fopen( f i 1 ename 2 , " rb" ) ; 
fseek( f i lei , 18 ,0)  ; 

f  read ( &targabuf fe r [ 5  7 ] j  0  j , 1 , 5 760  , f  i  le  1  )  ; 
fc lose ( f i le  1 )  ; 
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/*write  a  targa  file  for  later  display*/ 
f ile2=fopen( "\\targa\\display2 . tga" , "wb" ) ; 
fwrite ( targhead , 18 , 1 , f lie 2 ) ; 
fwr i te ( targabuf  fer , 1 , 1 6  384 , f i le2 ) ; 
fclose ( f ile2  )  ; 

convert  targabuf fer _to_temp( ) ; 
convert  temp_to_s lm ( ) ; 
wr  i  te  to  s  1  in  ( )  ; 


prepare_slm( ) 

{ 

char  far  *semetex; 

semetex  =  (char  far  *)  OxhOOOOOOO ; 

*  (  seme  tex+0x800 )  =1 ;  /*c  1  ea  r  s  1  nr* 


conver t_targabuf fer_to  tempi ) 

{ 

for(i=0;  i< 1 2  8 ;  i++) 

{ 

for(j=0;  i < 1 2 8 ;  j+  +  ) 

t 

i f ( targabuf  fer [ i j [ j ] ==0x00)  tempi i ] [ j ) =0x01 ; 
else  temp [ i j [ j ] =0x00 ; 

) 


convert_temp_to_slm( ) 

{ 

/“'convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM 

printf ("creating  SUM  format  \nM); 
for ( x=Q ;  x<128;  x++) 

1 

for(j=0;  j  < 1 6 ;  j  +  +  ) 

( 

slm [ x ] [ 4*j J  =  2*t emp [ 1 26  - 8*j ] [ x ] + temp [ 1 27  - 8*  j ] [ x ; *  2 52  ; 
slm [  x  ]  [  4*j+l  j  =8 '’'temp  [  124  -  8*j  ]  [  x  ]  +4* temp  [  125  -  8*j  ]  [  x  1  1 24 3  : 
slm [ x ]  [ 4*j  +  2 ] =3 2* temp [ 1 22  -  8* j ] [ x  J  +16* temp [ 123-8 * j  ]  [ x ]  g’O  /  : 
s lm [  x  J  [  4*j  +  3  ]  ■—  1  28* temp  [  120-  8*j  ]  [  x  ]  +64* temp  [  1  2 1  -  8* j  M  x  ’  (  6 3  : 


w rite  to  s 1 m ( ) 


203 


/--Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex ; 
semetex  ”  (char  far  *)  OxbOOOOOOO; 
pr intf ( "writing  to  the  SLM  \n"); 
for(j=0;  j  < 1 6 ;  j  + 1 ) 

{ 

for (x=0 ;  x< 1 2 8  ;  x++) 

{ 

i=x+128*j ; 

*  ( seme  text  i )  =  s  lm  [  x  ]  [  4*j  ]  ; 

* ( some tex+ i )  =  s 1 m [ x ] [ 1  +  4 - j j 
* ( seme tex+ i )  =  s 1 m [ x ] [ 2+4  - j ] 

*  ( seine  t  ex  +  i  )  =  s  1  in  [  x  ]  [  3+4  *  j  ] 

) 

i 

*( seme tex *0x801 )=1 ; 
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PROGRAM  FOR  BINARIZING  FRINGES  IN  THE  JOINT  TRANSFORM 

bv  Capt  John  OLino 
Aup.usl  il  ,  loRM 
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"  i  nr  1  ude  "  s  t  r  i  nr, .  h  " 

-"include  "math  h" 

uns  i  p.ned  eha  r  t  a  rr.lnnd '  18’  .  s  1  m ’  1  28  ’  ’  (>  1  ;  ; 

U!!>;  i  r.ned  char  t  arr.abuf  fer  ;  1  J  S  ’  128'  ,  ;  mp  ’  1 .?  8  I  .’8  ; 
in:  m.ixva  l  ue .  i,  j.  y. .  v.  col  .  row .  index ; 
tio.it  combined,  thrshid  0; 

FIFE  'Mi  lei; 

'.'oid  mainfj 

prepare  s  1  ih (.  i  ; 

joint:  transform  file*/ 
f  i  1  o  1  ■-  f  open  (  "\\t  nr  r,a\\graf>  1  .  tpa"  ,  "rb")  ; 
pr  int  f  (  "\n\nrcad  int;  in  data  \,n"): 
f  rend ( t  a  rghead . 1 , 1 8 , f  i  1 e 1 ) ; 
f  read ( t a rpabu f  f  e  r  .  1  .  1  b  38d  .  t  i  1  e  1  )  ; 
f e 1 ose ( f  i  1 e 1  )  ; 

/*calculn t.e  threshold  bv  finding,  awrtif.e  valur"/ 
for (row-O;  row<128;  rowt  t ) 

l 

for (col -0 ;  c  o 1 < 1 2  8 ;  col  +  t) 

( 

t  hrsh  Id  f  -  t  a r r.abuf  f  e  r row  j  [  col  j  ; 

! 

thrshid  t  li  rsti  1  d/ 1  6  3 8a  ; 

/•'!)  i  m;i  r  i  :te  pixels  based  on  threshold-/ 
pr  i  nt  f  (  ”1)  i  n.i  r  i ::  i  nr,  data  \n"); 
for( row-  ( ) ;  rove  128;  row t  t ) 

f  o  r  (  c o  I  0  ;  e  :>  1  <  1  2  8  ;  i'ol  )  i  ) 

2  OS 


array  to 


.to  to  si  re  ( ) 

'■''Write  the-  SI/  arrav  to  t  ho  SLM--' 
i'har  far  *seme t.i-x  ; 
sc- met  ex  -  (char  far  * )  OxbOOlx  hi:  id 
pr  i  nt f  (  "vr  i  t  i  nr,  to  t  ho  SLM  '  i:"  )  ; 
f  on  j  - 0  ;  j  <  1  6  ;  j  t  Li 

f  o  r  ix();  x-  1  ;  x  i  L> 


1  -  x  *  ;  .  b  •••- ;  ; 
i  :ii  ii!i' t  *  i  ■■ 

(  son  v  t  *  i  1 

'  >:•  -nn- 1  *  t  :  ) 
■'  i  sons-  t  (  X  t-  i 


"'.I  .  ■ 

»  ‘ '  i 
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,  i  .  ■  ; 
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/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/••'  PROGRAM  FOR  BINARIZING  FRINGES  IN  THE  JOINT  TRANSFORM  CORK  FIAT'  H 
/'-  by  Cnpt  John  Cline 

/*  August  31,  1989 

/-•- 

/ 

/"This  program  binarizes  the  fringes  of  the  JTC  by  finding  the  MED  I; 
/'"value  of  the  joint  transform  file  "grabl.tga",  and  using  i;  as  a 
/'"threshold.  If  the  value  is  greater  than  the  threshold  the  pixel 
/'"Would  be  on,  if  less,  the  pixel  is  off.  The  TARGA  file 
/“ "binary . tga"  is  saved  with  the  binary  version  of  the  fringes,  and 
/"the  SLM  is  appropriately  written  to  for  the  next  step  of  the  JTC. 


“include  "stdio.h" 

“include  "string. h" 

“include  "math.h" 

unsigned  char  ta rghead [ 1 8 j ,  s lm [ 1 28 j [ 64 ] ; 
unsigned  char  targabuf fer [ 1 28 ] [ 128 ] ,  temp [ 128 ][  128 ’ : 
int  maxvalue,  i,  j,  x,  y,  col,  row,  index; 
int  bins[256],  total=0; 
float  combined,  thrshld-0; 

FILE  *filel; 

void  main() 

I 

prepare_slm( )  ; 

/"get  joint  transform  file-/' 
f ilel  =  fopen( "\\targa\\grahl . t  ga" , "rb" ) ; 
pr intf ( "\n\nreadi ng  in  data  \n” ) ; 
f  road( ta  rghead , 1 , 1 8 , f i Le 1 ) ; 
f  read ( targabuf  fe r  ,  1  ,  1 6 389  ,  f i 1 e I ) ; 
f c lose ( f i lei ) ; 


•'read  heade 


/"'calculate  median  of  pixel  values  to  use  as  n  threshold-' 
pr  i  nt  f  (  "ca  1  cu  1  a  t  i  ng,  threshold  \n"  )  ; 
f  or  ( row-0  ;  row-:  1  28;  rowtil 

for f col  0;  col-:  128;  col  i  i  ) 

( 

bins!  t  a  rgabuf  fer;  row  ]  [  col  ,•  Hi; 


f.or(i-0;  t  o  t  a  1  <  =-8 1  92  ;  in 


lota  1 f  bins!  i  j  ; 
t  h  r  s  h  1  (1 1  t  ; 


/"'binarize  pixels  based  on  threshold*/ 
printf ("binarizing  data  \n"); 
for(row=0;  row<128;  row++) 

( 

for(col=0;  col<128;  coltf) 

( 

i  f  ( thrshld<targabuf  fer  [  row  ]  [  col  ] )  targabuf fe  r  [  ro 
else  targabuf fer [ row] [coll =0x00 ; 


1 

/*save  binarized  version  */ 
f ilel=fopen( "\\targa\\binary . tga" , "wb" ) ; 
fwrite ( targhead ,  18,  1,  filel); 

fwrite ( targabuf fer ,  16384,  1,  filel); 
fclose(filel) ; 

conver ttargabuf fer_to  temp( ) ; 
convert_temp_to_slm( )  ; 
write  to  slm( ) ; 


prepare_slm( ) 

( 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ; 

*(  seme  tex  f  0x800)  =  1  ; 


convert_ targabuf fer  to  temp ( ) 

for ( i=0  ;  i  < 1 2  8 ;  iff) 

1 

for(j=0;  j < 1 2 8 ;  j+f) 

( 

if ( targabuffer [ i ] [ j ] ==0x00)  tomp[ i ] [ j ]=0x01 ; 
else  temp [ i ][ j ] =0x00 ; 


convert  temp  to  slin() 

1 

/-’"convert  2  pixel.;  into  an  eight  bit  character  for  addri 

pr  i  n t  f  (  "c  re.i  t  ing  SLM  format  \n"); 
f  o r  ( x=0  ;  x-t  128  ;  x  »  ♦  ) 


•’(ft 


for ( j  =  0 ;  j<l 6  ;  j  t  t  > 


slm [ x ] [ 4* j  j  =2* temp [ 126  - 8*j ] [ x ] + temp [ 127  - 8*j ] [ x ] +  2  b? ; 
slm[ x ] [4*j+l ] =8* temp [ 124-8*j ] [ x] +4* temp [ 125  - 8*j ] [ x ] *243 ; 
s  lm  [  x  ]  [  4* j  +2  ]  =  3 2* temp  [  122  -  8* j  ]  [  x  ]  4  16* temp  [  12  3  -  8*j  ]  [  y.  ]  *20 
slm[  x]  [  4*j  +3  ]  =12 8* temp  [  120-  8*j  ]  [  x  ]  +  64* temp  [  12 1  -  8* j  ]  ;  ■  *  6 


/kk  kk  kk  kk  k  k  kk  k  k  kk  k  'k  ■> 

write_to_slm( ) 

( 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ("writing  to  the  SLM  \n" ) ; 
for(j=0;  j < 1 6 ;  j++) 

( 

for(x=0;  x<128;  x+*-) 


i=x+128*j ; 

*(semetex+i) 

*(semetex+i) 

*(semetex+i) 

*(semetex+i) 


slm[x] [ 4* j j  ; 
slm [ x ] [ l+4*j ] 
s lm [ x ] ( 2+4*j ] 
slm [ x] [ 3  *4*j ] 


*(semetex+0x801)=l ; 


y  'k  k  k  ~k k  k  'k  'k  k  k  k  k  k  k  k  k  k  k  k  k  k : 


/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 
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AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
PROGRAM  FOR  BINARIZING  FRINGES  IN  THE  JOINT  TRANSFORM  CORREI-A  l'OR 

by  Capt  John  Cline 
August  31,  1989 

This  program  binarizes  the  fringes  of  the  JTC  by  based  on  the  sign 
of  difference  between  the  joint  transform  file  "grabl.tga"  and  the 
Fourier  transform  of  the  scene  file  "top.tga",  and  using  it  as  a 
threshold.  If  the  difference  is  greater  than  the  zero,  the 
pixel  would  be  on,  if  less,  the  pixel  is  off.  The  TARGA  file 
"binary. tga"  is  saved  with  the  binary  version  of  the  fringes,  and 
the  SLM  is  appropriately  written  to  for  the  next  step  of  the  JTC. 


XXX^T  X"  X  VC  VC  VC  VC  VC  V 


^include  "stdio.h" 
^include  "string. h" 
-include  "math.h" 


unsigned  char  targhead [ 18 J ,  slm [ 128 ] [ 64 j ; 

unsigned  char  joint[128] [128] ,  targabuf fer [ 128 ] [ 128 ] ,  temp [ 1 28 ] [  1 28  ]  ; 
int  maxvalue,  i,  j,  x,  y,  col,  row,  index; 
float  combined; 

FILE  *filel; 

void  main() 

( 

prepare_slm( ) ; 

/*get  joint  transform  file'"/ 
f ilel=fopen( "\\targa\\grabl . tga" , "rb") ; 
pr intf ( "\n\nreading  in  data  \n" ) ; 

f  read  (targhead,  l,18,filel);  /“'read  Hondo  r-/ 

f read( j oint , 1, 16384, filel)  ; 
fclose(filel) ; 

/“get  scene  only  file*/ 
f i le 1=  fopen ( "\\targa\\t op . tga" , " rb" ) ; 
fseek(filel,18,0)  ; 
f read( targabuf fer . 1 , 1 6384 .filel); 
f c lose(filel); 

/••binarize  pixels  based  on  threshold  for  di  f  ference* / 
ju'intf ("binarizing  data  \n"); 
for(row=0;  row<128;  row-4 1) 


for(col=0;  col<128;  col++) 


combined-joint [ row] [ col j - targabuffer f row] [col  ]  ; 
i f (combined<=0) 


targabuf fer [ row] [col]=0x00; 


else 

{ 

targabuf  fe r [ row ] [ col ] =Oxf f  ; 


/"•save  binarized  version  */ 
filel=fopen( "\\targa\\binary . tga" , "wb") 
fwr i te ( targhead ,  18,  1,  filel) ; 

fwrite (targabuf fer ,  16384,  1,  filel); 
fclose(filel) ; 

conver t_targabuf fer_to_temp ( ) ; 
convert_temp_to_slm( ) ; 
write_to  slm( ) ; 


/kk  kk  kk  kk  'k'k  'kk  'k  k  kk  k  k  : 

prepare_slm( ) 

{ 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ; 

* (semetex+0x800)=l ; 


!  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 

conver t_targabuf fer_to_ temp( ) 

( 

for(i=0;  i< 1 2  8 ;  i  +  +) 
i 

for(j=0;  j < 1 2 8 ;  j++) 

{ 

if ( targabuf  fer [ i ] [ j ] ==0x00)  temp [ i j [ j ] =0x01 
else  temp [ i ][ j ] =0x00 ; 


/',fclear  si  nr 


convcrt_temp  to_slm( ) 

I 

/-'■convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SI. 

pr i n t f ( "crea t i ng  SLM  format  \n"); 
f  or  ( -  0  ;  x<  1  2 8  ;  x  t  t  ) 

( 

for ( j  =0 ;  j<l 6 ;  j  t  f  ) 

I 

slmjxj [ 4*j ]  =2 "temp [ 1 26  -  8* j ] [ x ] t temp  j 127  - 8* j  ] ; x ]  t  2  S3 ; 


2  1  2 


slm [ x ) [4* j  +  1 ] =8* temp [ 124- 8* j ] [ x  J +4 * temp [ 125-8 - j  j ; x j i 24  j  ; 
slm [ x ] [ 4* j  +2 ] =3 2* temp [ 122  - 8*j ] [ x ] +16* temp [ 1 23  -  8*  j ] fx j *  20 / ; 
s lm [ x ] [ 4*j +3 ] =12 8* temp [ 120  - 8*j ] [ x ] +64* temp [ 12 1 - 8*j 1  ; x ] *63; 

> 

1 


J'k'k  'kk  ~k~k  kk  kk  -A- -A-  'A— A-  'A -A  -A  'A-  > 

write_to_slm( ) 

{ 

/*Write  the  SLM  array  to  the  SLM*/ 
rhar  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ( "writing  to  the  SLM  \n" ) ; 
for ( j=0 ;  j < 1 6 ;  j++) 

{ 

for(x=0;  x<128;  x++) 

( 

i=x+128*j ; 

*(semetex+i)  : 

* ( seme tex+i )  : 

*(semetex+i)  : 

*(semetex+i)  = 

) 

! 

*(semetex+0x801 )=1 ; 


slm[x] [4*j ] ; 
slm [ x ] [ l+4*j ] 
slm[xj [ 2+4*j j 
s lm [ x ] [ 3+4*j ] 


>  JU  -L  jt,  '! 


k  'k  ~k  k  k k  'k  -) 
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/*  DIS-HF2.C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  INPUT  DISPLAY  TO  THE  JOINT  TRANSFORM  CORRELATOR 

/*  by  Capt  John  Cline 

/*  August  31,  1989 

/* 

/*This  program  displays  the  segmented  scene  and  template  created  bv 
/*an  earlier  run  of  the  joint  transform  correlator.  The  TARGA  file 
''"^"segment .  tga"  will  be  read  in  and  displayed  on  the  SLM. 


—  ^  ^  *a**  a,  •A,  vt  st  iX*  vt  «at»  <a*  Ox  fcju  *-U  ^  a,  a.  a--  a,  a^ 


-include  "stdio.h" 

-include  "string. h" 

int  i ,  j ,  x ; 

unsigned  char  slm[ 123} [ 64] ,  targabuf fer ( 128 ] [ 128 ] ,  temp [128] [1281 ; 


char  targhead[ ]  =  ( ' \x00 ' ,  ' \x00 ' ,  '\x03',  ' \x00 ' ,  ' \x00 ' 


1  \x00 '  , 


' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  '\x00', 
' \x80 '  ,  ' \x00 '  ,  ' \x80 ' ,  ' \x00 ’  ,  '\x08',  '\x00'| 


FILE  * f i 1 e 1 ; 

void  main() 

( 

preparers lm( ) ; 

/*read  in  file*/ 

filel=fopen( "\\targa\\segment . tga" , " rb" ) 
fseek(filel ,18,0) ; 
f read ( targabuf  fer , 1, 16384, fil el) ; 

convert_targabuf fer_to_temp( ) ; 
convert_temp_to_slin( )  ; 
write  to  slm( ) ; 


pt  epare  s lm( ) 

I 

char  far  *semetex; 

semetex  =  (char  far  *)  UxbOOOOOOO ; 

* ( seme  t ex +  0x800 )  1 ; 


convert  targabuf  f :■  r  to  temp() 


/*clen r  slm 


for(i=0;  i < 1 2  8 ;  i  +  +) 


for ( j  =0 ;  j < 1 2  8  ;  j  +  t ) 


if ( targabuf fer [ i ] [ j ] ==0x00)  temp [ i ] [j ] =0x01 ; 
else  temp [ i ][ j ] =0x00 ; 


1 

) 

) 

/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 

convert_temp_to_slm( ) 

I 

/■^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SIM*,/ 

printf ( "creating  SLM  format  \n"); 
for(x=0;  x<128;  x++) 


f°r(j=0;  j < 1 6 ;  j++) 

{ 

slm[x ] [ 4* j ]  =2*temp [126- 8*j ] [ x ] +temp [ 127  - 8*j ] [ x  j  +  252  ; 
s lm [ x ] [ 4*j  +  1 ] =8* temp [ 124  - 8*j ] [ x ] +4* temp [ 125-8 *j][xj+243; 
slm [ x ] [ 4*j +2 ] =32*temp [ 122  - 8*j ] [x]+16*temp[ 123-8*j ] [x]+207; 
slm [ x ] [4*j +3 ] =128* temp [ 120- 8*j J [ x ] +64* temp [121- 8 * j j [x ] +63; 


\ 


/'kk  -kk  'k'k  -k'k 

write  to  slm() 


/*Write  the  SLM  array  to  the  SIM*/ 
char  far  *semetex; 

semetex  =  (char  tar  *)  OxuuuuOUOO; 
printf ("writing  to  the  SLM  \n" ); 
for ( j  =0 ;  j <16 ;  j++) 

( 

for (x=0 ;  x<128;  x++) 


i=x+128*j ; 
*(semetex+i) 
* ( seme  text i ) 
* ( seme  text  i  ) 
* ( semetex +  i  ) 


s lm [ x ] [ 4*j ] ; 
slm [ x  j [ 1  +  4*j ] 
s  1  in  [  x  ]  [  2+4*j  ] 
s  1  m  [  x  j  j  3  1 4*j  j 


* ( seme tex  +  0x801  )  =  1 ; 


/*■ 

/* 

/■'• 

/* 

/* 

/* 

/•'■- 

/* 


^  ^  ^  Vr  ■&  'A'  •£  ^  'A'  ■&  k  kkkk  k  k  kkkk  k  k  k  k  $ 

DISPTOP . C 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
SCENE  ONLY  DISPLAY  TO  THE  JOINT  TRANSFORM  CORREIATOR 
by  Capt  John  Cline 
August  31 ,  1989 


/*This  program  displays  only  the  scene  half  (upper  71x128  pixels) 
/*the  TARGA  file  "display2 . tga"  onto  the  SLM.  This  program  is  par 
/*of  the  joint  transform  correlator,  and  is  run  after  the  scene  an 
/'"template  have  been  displayed  together. 


.U  -U 


"include  "stdio.h" 
^include  "string. h" 


int  i ,  j ,  x ; 

unsigned  char  slm [ 128 ] [ 64 ] ,  targabuf fer [ 128 ] [ 128 ] ,  temp [ 1 28 ] [ 128 ; ; 
FILE  *filel; 


void  main() 

{ 

prepare_slm( ) ; 

/* read  in  scene  half  only*/ 
f ilel=fopen( "\\targa\\display2 . tga " , "rb" ) ; 
fseek(filel,73]4,Oi ; 

f read (&targabuf fer [57] [0] ,l,9088,filel) ; 
fclose ( f i  le 1 )  ; 

convert_targabuf  fer_to_temp ( ) ; 
convert_temp_to_slm( ) ; 
write  to  slm( ) ; 


p  repa  re  s  1  in ( ) 

I 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO; 

*(semetex+0x800)=l ; 


/'kk  kk  kk  kk  ~k  k  k  k  kk 

convert_targabuf fer  to  temp( ) 
i 

for ( i=0 ;  i<1 28 ;  i 4  +  ) 

\ 

\ 

for  ( j  =  0  ;  j  <  1  2  8  ;  jo) 


/*c I ear 


i  f  ( targabuf  Fer  [  i  }  [  j  ]  0x00  )  temp  [  i  ]  [  j  ]  =0x0  1  ; 


) 


else  temp [ i ][ j ] =0x00 ; 


conver t_temp_to  slm( ) 

( 

/^'convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM 

printf ( "creating  SLM  format  \n"); 
for(x=0;  x<128;  x++) 

( 

for(j=0;  j < 1 6 ;  j++) 

I 

slm[x] [4*j ]  -2*temp [126- 8*j j [x]+temp[ 127-8*j ]  [x] +252; 
s lm [ x ] [4*j+l]=8*temp[124-8*j ] ( x ] +4* temp [125-8 *j ] [ x  j  +  24  3  : 
slm [ x] [ 4*j +2 ] =3 2* temp [ 122  -  8* j ] [ x ]  +  16* temp [ 12  3  - 8*j ] [ x ] f 20  7 ; 
slm [ x ] [4*j+3 J  =128*temp [ 120- 8* j 1 [ x] +64* temp [ 121- 8* j ] [ x ] t  63 ; 


wr ite_to_slm( ) 

( 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ("writing  to  the  SLM  \n"); 
for(j=0;  j < 1 6 ;  j++) 

1 

for(x=0;  x<128;  x++) 


i-x+128*j ; 

* ( semetex* i ) 
'u ( seme  tex+  i ) 
* ( seme  tex+ i ) 
* ( seme  tex  +  i ) 


* ( seme  tex+0x801 )  =  1 ; 


s  1  m  [  x  ]  [  4  *  j  j  ; 
slm [ x  j  [ l+4*j ] 
slm [ x ] [ 2+4*j ] 
s lm [ x ] [ 3+4*  j ] 
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/*  B IJI.T.-HF7.C  k/ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  CORRELATION  PLANE  INTERPRETER  FOR  THE  JOINT  TRANSFORM  CORRELATOR  'v 
/*  by  Capt  John  Cline  '■/ 

/*  August  31,  1989 

/*  */ 

/*This  program  finds  the  top  10  values  in  the  top  and  bottom  cross-  */ 
/“'correlation  regions  of  the  joint  transform  correlator  correlation  */ 

/“'plane  file  "grab2.tga".  It  rewrites  the  correlation  plane  file  */ 

/“'with  crosshairs  at  peak  locations  in  the  cross  correlation  regions  */ 
/*to  the  file  "max.tga".  Next,  it  uses  these  max  values,  along  with  */ 
/^earlier  calibration  values  stored  in  "cal.dat",  to  calculate  the  */ 
/'■^coordinates  of  the  target  in  the  original  scene.  (This  data  is  */ 
/^'displayed  on  the  computer  monitor.)  Having  done  this,  the  original-'/ 
/*scene  file  ( Mdisplay2 . tga)  is  rewritten  with  crosshairs  at  the  */ 

/“'target  location  as  "bullseye .  tga" .  This  program  differs  from  */ 

/*BULL-HF.C,  only  in  that  crosshairs  are  written  to  ” segment .  tga"  */ 

/"'instead  of  "display2 .  tga"  .  That's  because  this  is  a  part  of  a  JTC  */ 
/*that  uses  SEGMENTED  inputs  generated  from  a  earlier  pass  through  -’•/ 
/*the  JTC.  */ 

/ k k kkkkkkkkk k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k k A  A  A  *  A- k k k k k k k k k k  , 


^include  "stdio.h" 
-include  "string. h" 
“include  "math.h" 


int  i,  j,  k,  toptest=0,  bottest=0,  xb[10],  yb [10],  x  t [ 1 0  J ,  ytjlO]; 
int  ii,  jj ,  ilow,  ihigh,  jlow,  jhigh; 

unsigned  char  targaheader [ 18 j ,  targa ( 160 ] [ 128 j  ,  outbuf fer [ 128 J [ 1 28 1  ; 

unsigned  int  topx[Ll],  topy[Ll],  topvalue [ 11 ] ; 

unsigned  int  botxfll],  boty[ll],  botvalue [ 1 1 ] ; 

unsigned  char  caldata ( 4 ] [4 j  ; 

float  cal [4]  [4],  xx ,  yy ; 

float  xl,  x2 ,  yl ,  y2 ,  xfb[10],  xft[10],  yfb[10],  y f t [ 10] ; 

FILE  *f ilel ; 


void  main() 

I 

/*init ial ize  values*/ 
for(i=0;  L< 11;  i++) 

! 

topx [ i j  =0 ; 
topy [ i ] =0 ; 
topvalue [ i ] =0 ; 
botx [ i ] —0 ; 
bo  ty [ i J  =0 ; 
botva lue [ i ] ; 


/'“get  ccd  file*/ 
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f ilel=fopen( "\\targa\\grab2 . tga" , ” rb" ) ; 
f read( targahuader ,l,18,filel); 
pr intf ( "\n\nreading  in  data  \n”); 
fread(targa, l,20480,filel) ; 
fclose(filel)  ; 

/'*get  cal  data  file*/ 

filel=fopen( "\\turc\\cal . dat" , "rb" ) ; 

fread(caldata,l,16,filel); 

fclose (f ilel ) ; 

for(i=0;  i<4 ;  i++) 

{ 

for ( j  =0 ;  j<4;  j++) 

( 

cal [ i i [j ]=(float)caldata[i] [j  J ; 

) 


/*erase  center  autocorrelation  section*/ 
for(i=45;  i < 1 1 5 ;  i++) 

( 

for(j=0;  j < 1 2 8 ;  '++) 

( 

targa [ i ] [ j  ]=0x00; 

] 


/*locate  the  10  max  values  on  the  top*/ 
for(i=115;  i<l 60 ;  i++) 

I 

f or ( j  =0 ;  j <1 2 8 ;  j++) 

( 

if ( targa [ i] [j ]>=100) 

t 

if  ( toptes  t <  1 0 )  toptosLi-i  , 
k=9 ; 

while ( targa  [  i  ]  [  j  j  >topvalue  [ k ]  &&  k 
1 

topva lue [ k+1 ]= topva Lue [ k  j ; 
topx [ k+ 1 ] =topx [ k ] ; 
topy[k+l!=topy[k] ; 
topva lue [ k  j  =targa [ i j [ j j ; 
topx [ k  j  =j ; 
topy [ k]  =  i ; 
k  -  -  ; 


1 


/^locate  10  max  values  on  the  bottom*/ 
for(i=0;  i<45;  i 1 1 ) 


2 1 ') 


for ( j  =0 ;  j <128 ;  j  t  +  ) 


if ( targa [ i] [ j ]>=100) 

{ 

if  (bottest<10)  bottestff  ; 
k=9 ; 

while ( targa [ i j [ j ]  >botvalue[k]  &&  k>=0) 
( 

botvalue[kfl ]=botvalue [k j ; 

botx [ k+1 ]=botx [ k ] ; 

boty [ kf 1 ] =boty [ k ] ; 

botvalue [ k ] = targa [ i j { j j ; 

botx [ k ] =j  ; 

boty [k]=i ; 

k-  -  ; 

) 


/-write  file  with  crosshairs*/ 
for(j=0;  j<bottest;  j 4 t) 

( 

for(i=-3;  i<4 ;  iff) 


targa[boty[j ]+i] [botx[ j j  1=0x00; 
targa [ boty [ j ] ] [ botx [ j ] + i j -0x00 ; 

1 

1 

for ( j  =0 ;  j<toptest;  jff) 

( 

for(i=-3;  i<4 ;  iff) 

1 

targa [ topy [ j j  r  i  j ( topx [ j j ] =0x00 ; 
targa  [  topy  [  j  ]  ]  [  topx  [  j  ]  f  i  J  -0x00  ; 

) 

\ 

print F( "wri t ing  correlation  file\n"); 
f i le 1 =f  open ( "\\ targa\\max - t  ga " , "wb" ) ; 
fwr i t e ( targaheader , 1 8 , 1 , f i 1  el )  ; 
fwri  t  c>  ( targa  ,  20480 , 1  ,  f  i  lei  )  ; 
fclose(filol); 

This  part  of  the  program  finds  the  location  of  the  target 
location  of  the  correlation  peak.  It  puts  cross  hairs  on 
original  scene  file. 

/*read  in  the  segmented  scene  file*/ 
print f ( "reading  in  original  scene  file\n"); 
f i 1 e 1 = f open ( "\\ targn\\segment . tga" , "rh") ; 
fread( targaheader ,  1,  18,  filel); 
fread(  targa,  1,  16  384,  fili’l); 
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fclose ( f ilel )  ; 


/^calculate  the  target  coordinates  based  on 
/*upper  correlation  of  the  calibration  data 
printf ( "calculating  target  locat ion\n" ) : 
for(i=0;  i<toptest;  i++) 

( 

xl-(113/(cal[l] [0] -cal [0] [0] ) )*(topx[ i  ;  -c 
x2=(113/(cal[3] [ 0] -cal [ 2 ] [0] ))*(topx[  ij -c 
yl=(3C/(cal[0][l]-cal[2][l]))*(cal[0j[i;- 
y2=(30/(cal[l] [1] -cal [ 3 ] [l]))*(cal [ 1  ■  (  1  '  - 
xft[i]-(((((yl+y2)/2)-34)*(x2-7) 

+  ( (64- ( (yl+y2) /2) ))*(xl-7))/30)+ 
yft[i]=(((((xl+x2)/2)-7)*(y2-34) 

+  ( (120- ( (xl+x2)/2) ) )*(yl-34) )/l 1 
xt [ i ] “(unsigned) (xft[ij+.5); 
yt [ i ] “(unsigned) (yft [ i ]+. 5) ; 

) 


/^calculate  the  target  coordinates  based  on 
/* lower  correlation  of  the  calibration  data 
for(i=0;  i<bottest;  i++) 

I 

xl=(113/(cal[0] [ 2 ] - c  a 1 [ 1 ] [ 2 ] ) )*(cal [0 ; [2] 
x2  =  ( 11 3/(cal [ 2 ] [ 2  j -cal [ 3 ] [ 2  j ) )*(ca 1 [2 ; [2 ; 
yl=(30/(cal[2] [3] -cal [0] [ 3  J ) )*(borv- i. -c a 
y2  =  (  30/( cal  [  3  ]  [  3  ] -cal  1 1  j  [  3  j  ) ) *(  hot:  v  ;  i  ;  -ca 
xfb  [  i  ]■=(((  ( (yl+y2)/2)  -  34)*(x2  -  7  ) 

+  ( 64- ( ( vl+v2 )/2))*(xl-7), i/30)+ 7; 
yfb[ iJ-((( ((xl+x2)/2)-7)*(y2-34) 

+  (120-  ( ( x  1  t-x2  )  /2  )  )  *  ( v  1  -  34  )  )  /  L  1  )) 
xb [ i ] “(unsigned) (xfb [ i j  + . 5 ) ; 
vb [ i ]  =  (uns igned) (vfb [ i j  + . 5) ; 

\ 

el iminate_redundant ( ) ; 
ellminate_stray()  ; 
savesegmented  version) ) ; 

/-'write  file  with  Xs  on  weighted  background 
for (k=9 ;  k>=0;  k--) 

( 

i  i  =  0 ; 

for(i==123-vb[  k]  ;  i  <  1 3  2  -  vb  [  k  ]  ;  it  +  ) 

! 

j 

f  o  r ( j -xb • k  j -  4 ;  j  <xb ; k } + 3  :  j  t  t  > 

{ 

targaj i ] { j  j  bo l value { k  ; 
i  f  ( i  i  j  j  [|  i  i  -  -8  -  j  j  )  r  a  rga  ’  i  j 

j.)  *  ’  : 


i  i  t  +  ; 


t  Ik- 


a  1  ■  0  _  ii  :  t 
a  !  2  ’  0  •  t 

t  opv '  i  ’ J  i  J i 
topv '  i  it  -  * 


3 ) t  34  ; 


t!u-  valui-s 


-  hot x '  i  it 
-hotx  i  • 

i ;o;  ’  i ;  ■  ; 

l ' ;  ■;  ' .  ; 


+  34  ; 


at.  t 


()v()!l  ; 


2  2 1 


i  i=0 ; 

for ( i  =  I23 -yt [ kl ;  i< 1 3 2 - y t [ k ] ;  i+t) 


jj=o; 

for ( j=xt [k] -4 ;  j<xt[k]+5;  j++) 

{ 

targa [ i ] [ j ]=topvaiue [ k ] ; 

if (ii==j j  II  i i — 8  - j j )  targa [ i ][ j ] =0x00 ; 

jj++; 

) 

ii++ ; 


f ilel=fopen( "\\targa\\bul lseye . tga" , "wb" ) ; 

fwrite ( targaheader ,  18,  1,  filel); 

fwr ite ( targa ,  16384,  1,  filel); 

fclose ( filel)  ; 

for(i=0;  i< 1 0 ;  i++) 


printf ( "%u\t%u\t%u\t%u\t%u\t%u\n" , xt [  i  ] 

xb[  i  ]  , 


.  v  t  i  i  j  , 

yb [ i ] , 


t  opva 1 u< 


hot  v;i  1  uo  [ 


printf ( "press  any  key  to  continue"); 
ge  tch ( )  ; 


/  /V  k  kk  kk  k  k  kk  'k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 

el iminate_redundant( ) 

( 

/^eliminate  some  redundant  marks*/ 
f or (k=9 ;  k>0 ;  k--) 

( 

for(j=k- 1 ;  j>-0;  j -  - ) 

( 

if ( abs (xf t [ k ] -xf t [ j ] )<=5  abs(yft [ k] -yft .  [ j 1 )<= j) 

( 

i  f  ( topvalue  [  j  ]<25 1 )  topvalue  [  j  j  +  -- 3  ; 
else  topvalue [ j ] =255 ; 
xt [ k ] =0 ; 
yt [k]=0; 
topvalue  j  k ] =0 ; 

1 

i f ( abs (xf b [ k ] - xfb [ j ] )<=5  &&  abs (  v f  b [ k ] -  v f  b  j  j  |  ) -  -5 ) 
I 

i f (botvalue [ j ] <25 1 )  botva 1 uo [ j  j  + -5 ; 

else  botvalue [j ] =255 ; 

xb[k]=0; 

yb I k ] =0 ; 

botvalue [ k ] =0 ; 
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) 

! 

} 

/kk  kk  kk  kk  kk  k'k  kk  kk  k  'k  k  kk  kk  k  k  kk  k  k  kk  kk 

eliminate_stray( ) 

! 

for (k=9 ;  k>0 ;  k--) 

( 

j=9; 

while  (  (abs  (xft  [ k] -xfb  [j  ]  )>5  ||  abs (yf t [ k ] -yfb [ j j ) >5 )  &£•  j>=0) 

{ 

j--; 

if ( j<0) 

{ 

xt [ k] =0 ; 
y t [ k ] =0 ; 
topvalue [ k ] =0 ; 

} 

) 

j-9; 

while ( (abs (xfb [k] -xft [j ] )>5  ||  abs (yfb [ k ] -y f t [ j 1 )>5 )  &&  j>=0) 
( 

j  ; 

if ( j<0) 

{ 

xb ( k]=0 ; 
yb [ k ] =0 ; 
botvalue [k] =0 ; 

) 

) 

) 

) 

/  k  k  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk 

save_segmented_vers ion( ) 

1 

for ( i=0 ;  i<128;  i++) 

( 

for(j=0;  j < 1 2 8 ;  j++) 

( 

outbuffer [ j ] [ i ]=0x00 ; 

) 

) 

j low=0 ; 

for(j  =  10;  (j<24  &&  jlow==0);  j<  +  ) 

{ 

for(i  =  32;  i  <9  7  ;  i-t  +  ) 

I 

if (targa[ j ] [ i ] !=0)  j low-24- j ; 
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jhigh=0 ; 

for(j=38;  (j>24  &&  jhigh==0) ;  j--) 

{ 

for(i=32;  i<97 ;  i++) 

{ 

if (targa[ j ] [i] !=0)  jhigh=j-24; 

) 

1 

ilow=0 ; 

for(i=32;  (i<64  &&  ilow==0) ;  i++) 

( 

for( j=24- j low;  j<25+jhigh;  j++) 

{ 

if ( targa [ j ] [ i ] ! =0)  ilow=64-i; 

} 

) 

ihigh=0 ; 

for(i=96;  (i>64  &&  ihigh==0) ;  i--) 

{ 

for(j=24-j low;  j<25+jhigh;  j++) 

l 

if ( targa [ j ] [ i ] ! =0)  ihigh=i-64; 

i 

! 

for(k=0;  k<10;  k++) 

I 

if (xb [ k] ! =0  &&  yb [ k ] !=0) 

( 

i i*xb [ k J - ilow- 5 ; 
if(ii<0)  ii=0; 
jj~(128-yb[k] ) - j low- 5 ; 
if ( j  j  <57 )  jj=57; 

for(i=ii;  i<xb[k]+ihigh+6  &&  i< 1 2 8 ;  i++) 

{ 

i°r(j=jj i  j < ( 1 2 8 - y b [ k ] )+jhigh+6  &&  j < 1 2 8 ;  jt+) 

I 

outbuf fer [ j ] [ i ] =0xf f ; 

} 

) 

} 

i f ( x t [ k ] ! =0  &&  yt[k]!=0) 

( 

ii=xt [ k] - i low- 5 ; 
if ( i i<0)  i i=0 ; 
jj=(128-yt[k])-jlow-5; 
if ( j j<57)  j  j  =37 ; 

for(i=ii;  i<xt  [  k  ]  + ihigh-t  6  &&  i  <  1 2  8  ;  i++) 

I 

f  °r  ( j  =  j  j  ;  j<(  128  -y  t  [  k }  )+jhi  gh+6  &&  j  <  1 2  8  ;  jtt) 
( 

outbuf fer [ j  j [ i ] =0xf f ; 

) 
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f or ( j  =0 ;  j <128 ;  j++) 


for(i=0;  i<55;  i++) 

{ 

outbuf fer [ i ] [j ]=targa[ i] [ j ] ; 

) 

for(i=57;  i<l 2  8 ;  i++) 

( 

outbuffer [ i] [ j ] =outbuf fer [ i j [ j ]  &  targa[i](jj; 

) 


f i lel=f open( "\\targa\\segment . tga" , "wb") ; 
fwrite ( targaheader ,18,l,filel); 
fwrite (outbuf fer ,16384, l.filel); 
fclose (filel) ; 

I 

/X*kic&&&&‘k'k'k'k‘kic'k'k'k'k'k'k'k'k'k'k'k'k'k'&'k'k'k'k'k'-k'Jc-k'k'Jejc’&'k-&’k-k'!c'k'k'k'fC‘k''k 


*/ 


??ci 


G . 3  LPCT  Software 


A  number  of  programs  were  written  for  correlation  in  the 
LPCT- | FT j 2  feature  space.  Two  batch  files,  LRT-X.BAT  and 
LRT-SQ.BAT,  would  perform  all  steps  (except  throwing  the 
manual  switch)  necessary  to  do  correlation  in  this  feature 
space.  These  batches  used  an  "X"  and  a  "  +  or  squares  of 

different  sizes,  respectively  to  perform  the  correlation. 

Two  additional  batches,  LRT-180.BAT  and  LRT-NEG . BAT , 
would  take  the  intermediate  results  of  the  earlier  two 
correlations  (the  LPCT-|FTj2  features),  and  modify  the 
template  before  performing  correlation. 

Of  course,  the  batches  would  call  on  .  CMD  files,  used 
with  TESTTARG.EXE,  and  Turbo-C  source  code  to  complete  their 
tasks.  The  batch  files  are  listed  below,  followed  by  the  .CMD 
files  (in  order  of  appearance),  and  the  Turbo-C  source  code. 


A  number 

of  files  used 

in  the 

hatches  are 

the 

same 

as 

those  listed 

in  sections  G. 

1  and 

G.2.  They 

will 

not 

be 

duplicated  in 

this  section. 
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: LRT-X. BAT 

:This  batch  file  performs  a  joint  transform  correlation  on  the 
: log  polar  coordinate  transform  of  the  intensity  of  the  Fourier 
: transform  of  an  "X"  and  a  "+" . 

echo  off 


: CREATE  THE  X  AND  +  ANu  DISPLAY  THE  X 
CD  \TURC 
x  - 1  r  t 
disptop 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  X  (128X128) 

CD  \TARGA 
SET  TARGA=24  7 
SET  TARGASET=T8X- 10G 
testtarg  <f t_scene . cmd 

: DISPLAY  THE  + 
els 

CD  \TURC 
dispbot 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  t 
CD  \TARGA 

testtarg  <ft_temp.cmd 
els 

: DISPLAY  A  BLANK  MOSLM 
CD  \TURC 
erase  -  it 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  BLANK  TO  USE  AS  A  BIAS 
CD  \TARGA 

testtarg  <f t_erase . cmd 
els 

echo  THROW  THE  SWITCH 

pause 

els 


:  CAPTURE  THE  LPCT  OF  THE  BlAN'K 
t es t targ  <1 10x456 .cmd 


: REDUCE  THE  LPCT  OF  THE  B1ANK  TO  55X114 
: FOURIER  TRANSFORM  OF  THE  X  AND  D IS Pi  AY 
CD  \TURC 
red_  1  r  1 3 
ft:  scene 


THEN  BINARIZE 
ON  THE  MOSLM 


THE 


: CAPTURE  THE  LPCT  OF  THE  X 
CD  \ TARG A 

testtarg  <110x456. cmd 
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: REDUCE  THE  LPCT  OF  THE  X  TO  55X114  THEN  BINARIZE  THE 
: FOURIER  TRANSFORM  OF  THE  +  AND  DISPLAY  ON  THE  MOSLM 
CD  \TURC 
red_lrtl 
f  t_temp 

: CAPTURE  THE  LPCT  OF  THE  + 

CD  \TARGA 

testtarg  <110x4  t>b  .  cmd 
els 

•.REDUCE  THE  LPCT  OF  THE  +  TO  55X114 

: THEN  CREATE  A  BINARY  INPUT  FRAME  FOR  THE  JTC 

CD  \TURC 

red_lrt2 

lrt-comb 

els 

echo  THROW  THE  SWITCH 
pause 

: THE  NEXT  FEW  STEPS  PERFORM  THE  JTC 

: CAPTURE  THE  JOINT  TRANSFORM  128X128  ONLY 
CD  \TARGA 

testtarg  cjtl-lrt.cmd 
els 

: DISPLAY  THE  TOP  (THE  X)  ONLY 
CD  \TURC 
top  - 1 r t 

: CAPTURE  THE  FOURIER  TRANSFORM  FOR  THE  X  ONLY 
CD  \TARGA 

testtarg  <top-lrt.cmd 
els 

: BINARIZE  ON  AVERAGE  DIFFERENCE  AND  DISPLAY  ON  MOSLM 
CD  \TURC 
j  t-diff 

: CAPTURE  CORRELATION  PIANE 
CD  \TARGA 

testtarg  Cjt2-lrt.cmd 
els 

: LOCATE  PEAKS  IN  CORRELATION  PLANE 
CD  \TURC 
bul 1-lrt 
CD  \TARGA 

testtarg  <j c3-lrt.cmd 


: LRT - SQ . BAT 

:This  batch  file  performs  a  joint  transform  correlation  on  the 
: log  polar  coordinate  transform  of  the  intensity  of  the  Fourier 
: transform  of  a  scene  and  template  square. 

echo  off 

:  C R F A 'r F  THE  TWO  SOUARES  AND  DISPLAY  THE  ^CFYr  (T0n' 

CD  \TURC 
disp_lrt 
disptop 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  SCENE  (128X128) 

CD  \TARGA 
SET  TARGA=247 
SET  TARGASET=T8X- 10G 
testtarg  <f t_scene . cmd 

: DISPLAY  THE  TEMPLATE 
els 

CD  \TURC 
dispbot 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  TEMPLATE 
CD  \TARGA 

testtarg  <ft_temp.cmd 
els 

: DISPLAY  A  BLANK  MOSLM 
CD  \TURC 
erase- it 

: CAPTURE  THE  FOURIER  TRANSFORM  OF  THE  BLANK  TO  USE  AS  A  BIAS 
CD  \TARGA 

testtarg  <f t_erase . cmd 
els 

echo  THROW  THE  SWITCH 

p  a  u  s  e 

els 

: CAPTURE  THE  LPCT  OF  THE  BLANK 
testtarg  <110x456. cmd 

: REDUCE  THE  LPCT  OF  THE  BLANK  TO  55X114  THEN  BINARIZE  THE 
: FOURIER  TRANSFORM  OF  THE  SCENE  AND  DISPLAY  ON  THE  M"SIM 
CD  \TURC 
redj  rt3 
ft  scene 

: CAPTURE  THE  LPCT  OF  THE  SCENE 
CD  \TARCA 

testtarg  <110x456. cmd 
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.•REDUCE  THE  LPCT  OF  THE  SCENE  TO  55X114  THT’N  BINARIZE  THE 
: FOURIER  TRANSFORM  OF  THE  TEMPLATE  AND  DISPLAY  ON  "HE  MOSIM 
CD  \TURC 
red_lrtl 
f t_terap 

: CAPTURE  THE  LPCT  OF  THE  TEMPLATE 

Co  \  .  .P.  jf i 

testtarg  <110x456. cmd 


: REDUCE  THE  LPCT  OF  THE  TEMPLATE  TO  55X114 
: THEN  CREATE  A  BINARY  INPUT  FRAME  FOR  THE  JTC 
CD  \TURC 
red_lrt2 
lrt -comb 

els 

echo  THROW  THE  SWITCH 
pause 

: THE  NEXT  FEW  STEPS  PERFORM  THE  JTC 

: CAPTURE  THE  JOINT  TRANSFORM  128X128  ONLY 
CD  \TARGA 

testtarg  <j tl- Irt . cmd 
els 

: DISPLAY  THE  TOP  (THE  SCENE)  ONLY 
CD  \TURC 
top- lrt 

: CAPTURE  THE  FOURIER  TRANSFORM  FOR  THE  SCENE  ONLY 
CD  \TARGA 

testtarg  <top-lrt.cmd 
els 

: BINARIZE  ON  AVERAGE  DIFFERENCE  AND  DISPLAY  ON  MOSLM 

CD  \TURC 

jt-diff 

: CAPTURE  CORRELATION  PLANE 
CD  \TARGA 

testtarg  <j t2 - lrt . cmd 

c  Is 

: LOCATE  PEAKS  IN  CORRELATION  PLANE 
CD  \rURC 
bull -lrt 
CD  \TARGA 

testtarg  <j t3 - lrt . cmd 
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: LRT- 180 . BAT 

:This  batch  file  performs  a  joint  transform  correlation  on  the 
: log  polar  coordinate  transform  of  the  intensity  of  the  Fourier 
: transform  using  feature  files  already  created  from  an  earlier 
: run  of  either  LRT-X.BAT  or  LRT-SQ.BAT.  It  uses  only  the 
:center  180  degrees  of  the  template  in  the  first  step. 

ectio  ott 
els 

: CREATE  A  BINARY  TNPUT  FRAME  FOR  THE  JTC 

CD  \TURC 

lrt-180 

: CAPTURE  THE  JOINT  TRANSFORM  128X128  ONLY 
CD  \TARGA 

testtarg  <jtl-lrt.cmd 
els 

: DISPLAY  THE  TOP  (THE  SCENE)  ONLY 
CD  \TURC 
top  - lrt 

: CAPTURE  THE  FOURIER  TRANSFORM  FOR  THE  SCENE  ONLY 
CD  \TARGA 

testtarg  <top-lrt.cmd 
els 

: BINARIZE  ON  AVERAGE  DIFFERENCE  AND  DISPLAY  ON  MOSLM 
CD  \TURC 
j  t -diff 

: CAPTURE  CORRELATION  PLANE 
CD  \TARGA 

testtarg  <jt2-lrt.cmd 
els 

: LOCATE  PEAKS  IN  CORRELATION  PLANE 
CD  \TURC 
bull- lrt 
CD  \TARGA 

testtarg  Cjt3-lrt.cmd 
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: LRT - NEG . BAT 

:This  batch  file  performs  a  ioint  transform  correlation  on  the 
:log  polar  coordinate  transform  of  the  intensity  of  the  Fourie 
:transform  using  feature  files  already  created  from  an  earlier 
: run  of  either  IJTT-X . BAT  or  LRT-SQ.BAT.  It  uses  only  the 
'.center  180  degrees  of  the  NEGATIVE  of  the  template  in  the 
: first  step . 

echo  off 
els 

: CREATE  A  BINARY  INPUT  FRAME  FOR  THE  JTC 

CD  \TURC 

Irt-neg 

: CAPTURE  THE  JOINT  TRANSFORM  128X128  ONLY 
CD  \TARGA 

testtarg  <jtl-lrt.cmd 
els 

: DISPLAY  THE  TOP  (THE  SCENE)  ONLY 
CD  \TURC 
top- lrt 

:  CAPTURE  T,,c:  FOURIER  TRANSFORM  FOR  THE  SCENE  ONLY 
CD  \TARGA 

testtarg  <top- lrt . cmd 
els 

: BINARIZE  ON  AVERAGE  DIFFERENCE  AND  DISPLAY  ON  MOSLM 
CD  \TURC 
j  t  -  d  i  f  f 

: CAPTURE  CORRELATION  PLANE 
CD  \TARGA 

testtarg  <j t2-lrt.cmd 
els 

:  LOCATE  PEAKS  IN  CORRELATION  PLANE, 

CD  \TURC 
bull-lrt 
CD  \TARGA 

testtarg  <jt3-lrt.cmd 


: FT  SCENE . CMD 

: This  is  a  command  file  to  be  used  with  the  TARGA  program  TKSTTARG . EXE . 
:It  is  used  in  the  JTC  using  LPCT  features  to  capture-  a  128X128 
: pixel  region.  The  data  is  stored  in  the  file  "ft  scene . tga" . 

1  ive 

: CRA3JRLG  rROVIDL  «  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAM 
erase 
0 
0 
0 

erase 

0 

0 

0 

: GRAB  THE  FRAME 

grab 

dis 

: SAVE  CENTER  128X128 
p  u  t  p  i  c 
f  t  _ scene 
192 
136 
319 
26  3 
- 1 

erase 

0 

0 

0 

: REDISPLAY  SAVED  SECTION 
get pic 
ft  scene 
0 
0 
-1 

graphend 

quit 
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: FT  TEMP.CMD 

:This  is  a  command  file  to  be*  used  with  the  TARGA  program  TESTTA! 
:It  is  used  in  the  JTC  using  LPCT  features  to  capture  a  128X128 
:pixel  region.  The  data  is  stored  in  the  fiLe  " f t_t emp . t ga " . 

1  TXT-. 

i-  l  V  c? 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  PRAM! 
erase 
0 
0 
0 

e  r  a  s  e 
0 
0 
0 

: GRAB  THE  FRAME 

grab 

dis 

: SAVE  CENTER  128X128 
putp  ic 
f  t_ temp 
192 
136 
319 
26  3 
-1 

e  rase 
0 
0 
0 

: REDI SPIAY  SAVED  SECTION 
ge  t p  i  c 
f  t_t.emp 
0 
0 
-  1 

graph end 
qu  i  t; 


:  FT  ERASE.CMD 

:This  is  a  command  file  to  be  used  with  the  TAKGA  program  " 
:It  is  used  in  the  JTC  using  LPCT  features  to  captutu  ;  1  . ■  - 
:  pixel  region.  The  data  is  stored  in  the  file  "ft  <  1  e.t  .  •  • 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  ERopHi 
e  rase 
0 
0 
0 

erase 

0 

0 

0 

:  GRAB  THE  FRA>! L' 
grab 
d  i  s 

: SAVE  CENTER  128X128 
put  p  i. c 
f  t  (-rase 
192 
136 
319 
26  3 
-1 

e  rase 
0 
0 
0 

:  RED  I  SPIj\Y  SAVED  SECTION 
get  pic 
ft  erase 
0 
0 
- 1 

graphond 

quit 
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: JT1-LRT.CMD 

:This  is  a  command  file  to  he  used  with  the  TARGA  program  TESTTARG . EXE . 
:  It  is  used  in  the  joint  transform  correlator  to  capture  a  1  .'8X128 
:pixel  region.  The  data  is  stored  in  the  tile  "grab  1 . tga " . 

live 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 
erase 
0 
0 
0 

erase 

0 

0 

0 

: GRAB  THE  FRAME 

grab 

dis 

: SAVE  CENTER  128x128 
putpic 
grabl 
192 
136 
319 
263 
-1 

e  rase 
0 
0 
0 

: REDISPLAY  SAVED  SECTION 
ge  tp ic 
grabl 
0 
0 
-1 

graph end 
quit 


: TOP  - LRT . CMD 

:This  Is  a  command  file  to  be  used  with  the  TARGA  program  TESTTARG.EXE. 
:It  is  used  in  the  joint  transform  correlator  to  capture  a  128X128 
:pixel  region.  The  data  is  stored  in  the  file  "top.tga". 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 

erase 

0 

0 

0 

erase 

0 

0 

0 

: GRAB  THE  FRAME 

grab 

dis 

: SAVE  CENTER  128x128 

putpic 

top 

192 

136 

319 

263 

-1 

e  rase 
0 
0 
0 

: REDISPLAY  SAVED  SECTION 
getpic 
top 
0 
0 
- 1 

graphend 

quit 


: JT2-LRT.CMD 

:This  is  a  command  file  to  be  used  with  the  TARCA  program  TESTTARC . EXE , 
: I t  is  used  in  the  joint  transform  correlator  to  capture  a  200X128 
: pixel  region.  The  data  is  stored  in  the  file  "corr.lrt". 

1  ive 

: ERASURES  PROVIDE  A  DELAY  AFTER  GOING  LIVE  TO  ENSURE  PROPER  FRAME  GRAB 

erase 

0 

0 

0 

erase 

0 

0 

0 

: GRAB  THE  FRAME 

grab 

dis 

: SAVE  CENTER  200X128 
putpic 
corr . lrt 
192 
100 
319 
299 
-1 

erase 

0 

0 

0 


: REDISPLAY  SAVED  SECTION 
getpic 
corr. lrt 
0 
0 
- 1 

graph end 
quit 
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JT3-LRT.CMD 

This  is  a  command  file  Co  be  used  with  cne  TARGA  program  TKSTTAki 
It  is  used  to  display  the  results  of  the  joint  transiorm  corn- 1  at 
using  the  LPCT  features. 


erase 

0 

0 

0 

dis 

: GET  OPTICAL  FOURIER  OF  SCENE 
getpic 
f  t_scene 
0 

271 

-1 

: GET  BINARY  FOURIER  OF  SCENE 
getpic 

f t_scene .bin 
128 
271 
- 1 

: GET  OPTICAL  FOURIER  OF  TEMPLATE 
getpic 
f  t_temp 
256 
271 
-1 

: GET  BINARY  FOURIER  OF  TEMPLATE 
getpic 
f  t_temp .bin 
386 
271 
- 1 

: G FT  ORIGINAL  INPUT  FILE 
ge  tp  i  c 
dis pi  ay 2 
0 

135 

- 1 

: G ET  OPTICAL  LPCT  OF  FT  OF  SCENE 
getpic 
scene . lrt 
128 
1  0 
-  1 
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: GET  OPTICAL  LPCT  OF  FT  OF  TEMPLATE 
getpic 

template . lr t 
128 
135 
-1 

: GET  BINARY  LPCTs  IN  JTC  INPUT  FORMAT 
getpic 
lrt_comb 
256 
135 
-1 

: GET  JOINT  TRANSFORM  OF  TWO  LPCT  INPUTS 
getpic 
grabl 
0 
0 
-1 

: GET  FT  OF  SCENE  LPCT  ALONE 
getpic 
top 
128 
0 
-1 

: BINARY  JOINT  TRANSFORM 
getpic 
binary 
256 
0 
-1 

: GET  CORRELATION  PLANE 
getpic 
cor r . lrt 
384 
0 

-1 

: SAVE  RESULTS 
putpic 
1 rtdisp 

0 

0 

511 
399 
- 1 

graphene! 
q  i  i  i  t: 
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/*  X-LRT.C 

/* 

/* 

/* 

/* 

/* 

/* 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
INPUT  FILE  MAKER  FOR  THE  COORDINATE  TRANSFORM  JTC 
by  Capt  John  Cline 
September  30,  1989 


/"'This  program  creates  an  array  with  a  plus  and  an  X,  and  saves 
/*in  the  TARGA  file  " display2 . tga " .  This  file  will  be  used  to 
/'"correlate  in  the  coordinate  transform  feature  space.  Tiu-  pro 
/'"DISPTOP.C  (used  in  the  JTC)  and  DISPBOT.C  will  display  these 
/'"'patterns  on  the  MOSLM  one  at  a  time,  so  their  Fourier  feature 
/*be  collected. 

/ 'k 'k 'k 'k^~ki<'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k ~k ~k 'k 'k 'k'k'k'k 'k 'k 'k ~k "k 'k 'k 'k -k 'k ~k ~k 'k 'k 'k -k 'k ~k "k 'k 'k 'k 'k ~k  /V  /V 

^include  "stdio.h" 

"include  "string. h" 


them 

grams 
two 
s  can 


V 

V 
/ 
/ 

■/ 

V 
v 

V 

V 

V 

V 
'■/ 

V 

V 
'/ 

V 


int  col,  row; 

char  targhead[]  =  ('\x00',  '\x00' ,  '\x03',  '\x00', 

' \x00 ' ,  '\x00' ,  '  \x00 '  ,  ' \x00 ' , 
' \x80 ' ,  ' \x00 ' ,  ' \x80 ' ,  ' \x00 ' , 

unsigned  char  targa ( 128 ] [ 128 ] ; 

FILE  *filel; 

void  main() 


'  \x()0 '  ,  '  \x00 1 
' \x00 ' ,  '\x00' 
' \x08 ’ ,  '\^00' 


/*write  the  scene  "x"*/ 
for(col=47;  col<81;  col++) 


targa [ col+40 ] [col-1 ]~255; 
targa [167-col] [ col - 1 ] =255  ; 
targa [ col+40 ] [col]=255; 
targa [ 167-col ] [col]=255; 
targa [ col+40 ] [col+l]=255; 
targa [167-col] [col+l]=255; 


/'"'write  the  template  "  +  "*/ 
for(col=40;  col<88;  col++) 

I 

targa[31] [col]=255; 
targa [32] [col] =2 55; 

) 

for(row=7;  row<55;  row++) 

( 

targa [row] [ 6  3 ] =2  5  5 ; 
targa[row] [64J=255; 
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/*save  TARGA  file*/ 

pr intf ( "writing  TARGA  file  to  targa\\display2 . tga\n" ) ; 

f ilel=fopen( "\\targa\\display2 . tga" , "wb" ) ; 

fwrite ( targhead ,  18,  1,  filel); 

fwrite ( targa ,  16384,  1,  filel); 

fclose(filel) ; 

} 

^'k'k'k'k'k'k-k'kk'k'k'k'k'k'kk'k'k'k'kkk'k'k'k'k'k'kk'k-k  ~k  k  ~k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 
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/kk'k'kkkkk'k'k'k'kk'k'k'kkkkkkkkkkkkkkkkkkkk'kkkkkkkkkkkk'kkkkkkkkkkkkkkkkkkkk 
/*  DISPBOT . C 
/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  TEMPLATE  ONLY  DISPLAY  TO  THE  JOINT  TRANSFORM  CORRELATOR 
/*  by  Capt  John  Cline 

/*  September  30,  1989 

/* 

/*This  program  displays  only  the  template  half  (lower  57x128  pixels) 
/*of  the  TARGA  file  "display2 . tga"  onto  the  upper  portion  of  the  SLM 
/*This  program  is  part  of  the  coordinate  transform  joint  transform 
/^correlator,  and  is  used  to  capture  the  Fourier  features  of  the 
/'-template . 

/kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk  kkkkkkkkkkkk  kkkkkkkkkkkk 


‘k  t 
/ 

*/ 

/ 

‘V 
.*-  / 
“/ 

/ 

*/ 

*/ 

'k  / 
/ 

*/ 

*/ 

*/ 

*/ 


** include  "stdio.h" 

^include  "string. h" 

int  i ,  j ,  x ; 

unsigned  char  slm [ 128 ] [ 64 ] ,  targabuf fer [ 128 ] [ 128 ] ,  temp [ 128 ][ 128 ] ; 


FILE  *f ilel ; 


void  main() 

I 

prepare_slm( ) ; 

/'-•read  in  template  half  only*/ 

filel-f open ( "\\targa\\display2 . tga" , " rb” ) ; 

fseek( f i lei , 18 , 0) ; 

f read (&targabuf fer [83] [0] ,l,5760,filel) ; 
fc lose ( f ilel ) ; 

convert_targabuffer_to_temp( ) ; 
convert_temp_to  slm() ; 
write_to  slm(); 


prepare_slm( ) 

< 

char  far  *semetex; 

se.netex  =  (char  far  *)  OxbOOOOOOO; 

* ( seme tex  +  0x800 )  =  1 ;  /*c  1  ear  slur'- 


f  ~k  k  kk  'k'k  kk  ~k'k  kk  kk  kk  k  k  k  kk  kk  kk 

c onvcrt_ targabuf  fer_to_temp ( ) 
f 

for ( i=0 ;  i < 1 2  8 ;  i++) 

( 
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for(j=0;  j < 1 2 8 ;  j++) 


if ( targabuf fer [ i ] [ j ] ==0x00)  temp [ i ] [ j ] =0x01 ; 
else  temp [ i ][ j ] =0x00 ; 

) 

) 

} 

/kk  kk  kk  'k'k  'kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 
convert_temp_to_slm( ) 

{ 

/'^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM*/ 

printf ( "creating  SLM  format  \n"); 
for(x=0;  x<128 ;  x++) 

( 

for ( j=0 ;  j<16 ;  j++) 

( 

slm[x] [ 4*j 1  =2* temp [ 126  - 8*j ] [x] +temp [12  7- 8*j ] [ x ] +252 ; 

slm[x] [ 4*j +1 ] =8*temp [ 124-8*j ] (x]+4*temp[ 125-8*j ] [x] +243 ; 
slm[x ] [ 4*j  +2 ] =3 2* temp [122- 8* j ] [ x ] +16* temp [ 123 -8*j ] [ x ] +20  7 ; 
slm[x] [ 4*j  +  3 ]  =  128*temp [ 120  - 8*j ] [x] +64*temp [ 121 - 8* j ] [xj+63; 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk 

write_to_slm( ) 

( 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 

semetex  =  (  far  *)  UxbOOOOOOO ; 

printf ( "writing  to  the  SLM  \n" ) ; 
for(j=0;  j <1 6 ;  j++) 


for(x=0;  x<128; 

( 

i-x+128*j ; 

* ( seme  tex+i ) 
*(semetex+i) 
*(semetex+i) 
*(semetex+i) 

) 


x++ ) 


=  slm[x j [ 4*j ] ; 

=  slm[x] [ l+4*j ] 
=  slm [ x ] [ 2+4*j ] 
=  slm[x] [ 3+4*j ] 


*(semetex+0x801)=l; 


kk 


k k k k kkkkkkkkkkkkkkkkkkkkkkkkkkkk k k k 


+.  -C 
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z^*******^*^**************************  **************** 
/*  ERASE- IT . C 
/* 

/* 

/* 

/* 

/* 

/* 

/*This  program  erases  the  MOSLM,  that's  all. 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
MOSLM  ERASE  PROGRAM 
by  Capt  John  Cline 
August  SI ,  1989 


X  X  X  X  "X"  X  VC  V 


V 
7 

V 

-/ 

/ 

/ 

-/ 

7 

7 

7 


#include  "stdio.h" 

^include  "string. h" 

void  main() 

{ 

/*erase  the  slm*/ 

char  far  *semetex; 

printf ( "erasing  the  SLM\n"); 

semetex  =  (char  far  *)  OxbOOOOOOO; 

*(semetex+0x800)=l ;  /*clear  si  in*/ 


I  k  k  kkkk  k  kkkkkk  k  k  k  kkkk  k  k  'A'  k  kkkk  k  k  k  kkkk  k  k  k  k  k  k  k  k  k  k  k  k  k 


k  k  'k  ~k  k  k  k  k  k  k  k 


■*/ 
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/***********************************************  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  * .'.-  *  / 
/*  RED_LRT3.C  */ 

/*  */ 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY  */ 

/*  PROGRAM  FOR  REDUCING  FILES  USED  IN  THE  COORDINATE  TRANSFORM  JTC  */ 
/*  by  Capt  John  Cline  */ 

/*  September  30,  1989  */ 

/*  */ 

/*This  program  reduces  a  110x456  TARGA  file  to  55x128  for  display  on  */ 
/*the  SLM  in  the  joint  transform  correlator.  The  reduction  is  done  */ 
/*by  averaging  2  for  1  vertically  and  4  for  1  horizontally.  Zeros  */ 
/*are  added  on  the  left  and  right  sides.  The  file  is  stored  as  */ 

/*"erase . lrt" .  This  new  file  is  a  reduced  version  of  the  log  polar  */ 
/■^coordinate  transform  of  an  erased  MOSLM.  It  will  be  used  to  */ 

/^reduce  system  bias  during  binarization  of  the  scene  and  template  */ 
/*LPCT  Fourier  features.  -'■/ 


^include  "stdio.h" 

-include  "string. h" 

-include  "math.h" 

char  targhead[ ]  =  {'\x00',  '\x00',  '\x03',  '\x00',  '\x00',  '\x00', 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  '\x00', 

' \x80 ' ,  ' \x00 ' ,  ' \x37 ' ,  ' \x00 ' ,  '\x08',  '\x00']; 

u:.Ji6uod  cha.  Inbuffer  [  110]  [456  ]  ,  outbuf  fer  [  55  ]  [  123  ]  ; 

int  combined,  i,  j,  k,  ii,  jj ; 

FILE  *f ilel ,  *file2; 

void  main() 

( 

printf (" reducing  lrt  of  erased  SLM\n"); 

/*open  files  and  handle  headers*/ 
f ilel=fopen( "\\targa\\grablrt . tga" , "rb" ) ; 
fseek(filel, 18,0)  ; 

f ile2=fopen( "\\targa\\erase . lrt" , "wb" ) ; 
fwrite ( targhead ,  18,  1,  file2); 

/*read  data  in,  reduce,  and  output*/ 
fread( inbuffer ,  1,  50160,  filel); 
for(i=0;  i<110;  i+=2) 

( 

for(j=0;  j<456;  j+-4) 

( 

comb  ined=0 ; 

for(ii=i;  i i< i *2 ;  ii++) 

( 

for(jj=j  !  j  j  <j  :  jj  +  O 

( 

comb ined+  =  inbuf fer [ i i ] ( j  j ] ; 

) 

y-c 


} 

outbuf  fer [ i/2 ]  [  j/4+7 ]  =(combined+4) /8 

} 

} 

fwrite (outbuffer ,  7040,  1,  file2); 
fclose (f ilel)  ; 
fclose ( f ile2 )  ; 
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^kkkkkkk'kkkkkkkk'kkk'k'kkkkkkkkkkkkkkk'kk'kkkkkkkkkkkkk k  k ~k ~k k k k k  k  k  ■ 

/*  FT_SCENE.C 
/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  FOR  BINARIZING  FRINGES  THE  FOURIER  TRANSFORM 

/*  by  Capt  John  Cline 

/*  September  30,  1989 

/* 


/ 


/*This  program  binarizes  the  Fourier  transform  of  the  original  scene 
/*input  to  a  coordinate  transform  joint  transform  correlator  (before 
/"'coordinate  transforming).  There  are  two  input  files  "  f  t  scene  .  t  ga " 
/*and  the  system  bias  file  "fterase . tga"  (created  by  detecting  the 
/^Fourier  transform  of  a  blank  MOSLM) .  The  bias  file  values  are 
/'"Subtracted  from  those  of  the  scene  file  and  the  result  is  binarized 
/"'on  five  times  the  average  difference  (you  may  want  to  look  at 
/"'alternative  binarization  techniques).  The  binary  array  is  stored 
/*in  TARGA  format  as  "ft_scene.bin"  and  is  displayed  to  the  MOSLM  for 
/*log  polar  coordinate  transformation . 


~ include  "stdio.h" 
^include  "string. h" 
??include  "math.h" 


int  maxvalue,  i.  j,  k,  test,  x,  v.  col,  row  index; 
float  combined,  thrshld=0; 

unsigned  char  buf ferin[ 128 ] ( 128 ] ,  temp [ 128 ][ 128 ] ; 
unsigned  char  targabuf fer [ 128 ) [ lz8 ] ,  slm[ 128 ] [ 64 ] ; 
char  targhead [ 18 J ; 

FILE  *filel; 


void  main( ) 

f 

nrenare_s lm ( ) ; 

,/*get  scene  file'"'/ 

filel=fopen(  "\\t.arga\\f  t_  scene  .  tga"  ,  "rb"  )  : 
print f ( "\n\nreading  in  data  \n"); 

fread(  targhead  ,  1 ,  18  ,  f  i le  1 )  ;  /"'read  header •■/ 

f  read (buf  f e  r in , 1, 16384, filel) ; 
fclose( filel )  ; 

/*get  erase  file*/ 

f  i  le l  =  f open (  ”\\ targa\\f  t.  erase  .  tga"  ,  "  rb"  )  ; 
f seek( f i le 1 , 1 8 , 0) ; 
f  read( targabuf fer , 1 , 16384 , filel) ; 
fclose(filel) ; 

/'"'calculate  threshold  bv  finding  average  difference'"/ 
for(row=0;  row<128;  row+f) 
i 

for(col=0;  col<128;  col++) 
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( 


thrshld+=buf  fer in [ row ] [col] - targabuf  fer : row ] [ co 


} 

thrshld=5*thrshld/16384 ; 

/^binarize  pixels  based  on  threshold  for  difference*/ 
printf ( "binar iz ing  data  \n"); 
for(row=0;  row<128;  row++) 

( 

for(col=0;  col<128;  col++) 

( 

combined=buf f er in [ row ] [ col ] - targabuf fer [ row] [ co 
if (combined<=thrshld) 

{ 

targabuf fer [ row] [col]=0x00; 

) 

else 

{ 

targabuf fer [row] [col ]=0xff ; 


/*save  binarized  version  */ 
f i le l  =  fopen( "\\targa\\f  t_scene . bin" . "wb" ) ; 
fwr i te ( targhead ,  18,  1,  filel); 
fwrite ( targabuf fer ,  16384,  1,  filel); 
fclose(f ilel) ; 

convert_targabuffer_to_temp( ) ; 
convert_temp  to_slm(); 
write_  to  slm( ) ; 


prepare_slm( ) 

I 

char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO; 

*  ( seme  tex  t  0x800 )  1 ; 


convert  targabuf fer  to  temp() 

{ 

for ( i =0 ;  i <1 28 ;  i *  t ) 

f o r ( j  =0 :  j < 1 28 ;  j  +  + ) 

I 

i  t  ( targabuf  fer  ;  i  ]  [  j  ]  -  -0x00)  tcinp[  i  ]  j  j  i-0xOL ; 
e 1 se  t emp [ i ] [ j ] =0x00 ; 
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i 


convert_temp_to_slm( ) 

{ 

/^convert  2  pixels  into  an  eight  bit  character  for  addressing  the 

printf( "creating  SLM  format  \n"); 
for(x=0;  x<128;  x++) 

{ 

for(j=0;  j<16;  j++) 

( 

slm ( x ] [ 4*j ]  =2* temp [ 126 - 8*j ] [ x ] + temp [ 12 7 - 8* j  i [ x ; +2  52 : 
s lm [ x ] [ 4*j  +1 ] =8* temp [ 124  - 8*j ] [ x ] +4* temp [ 12  5  - 8*j ] { x ] +24 1 : 
slm [ x ] (4*j  +2 ]-32*temp [ 122 - 8*j ] [ x ] +16* temp [ 12 3 - 8* j j [x  J+207 
slm [ x ] [ 4*j  +  3 ] =128* temp [ 120 - 8*j 1 f  x ] +64* temp I 121  - 8*j j  '  +6 3 


J  VC  VC  Va  "/-C  b-C  VC  VC  VC  VC  IrC  VC  VC'/C  VC  VC  "X  VC  VC  '/-C  VC  t-C  t-C 

write_to_slrn( ) 

( 

/-Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ( "writ ing  to  the  SLM  \n " )  ; 
for(j=0;  j  < 1 6 ;  j++) 

! 

for(x=0;  x< 128;  x+t) 

( 

i-x+128*j ; 

*(semetex+i)  =  slm[x] [4*j ] ; 

* (seme text i)  =  slm[x] [ l  +  4*j ] ; 
*(semetex+i )  =  slmix]  [  2+4*j  j  ; 

(semetex ♦  i  )  -  slmfx;  [  3  +  4* j  ]  : 

j 

j 

*  ( seme  tex+0x80 1  )  --1  ; 


fxxxxxxxxxxv 


/*  RED_LRT1.C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  FOR  REDUCING  FILES  USED  IN  THE  COORDINATE  TRANSFORM  JTC 
/*  by  Capt  John  Cline 

/*  September  30,  1989 


/-This  program  reduces  a  110x456  TARGA  file  to  55x128  for  display  on 
/-'the  SLM  in  the  joint  transform  correlator.  The  reduction  is  done 
/-'by  averaging  2  for  1  vertically  and  4  for  1  horizontally .  Zeros 
/-'are  added  on  the  left  and  right  sides.  The  file  is  stored  as 
/*" scene .  lrt"  .  This  new  file  is  a  reduced  version  of  the  log  polar 
/-'coordinate  transform  of  a  scene's  Fourier  features.  It  will  be 
/-'binarized  in  another  program,  then  used  as  an  input  to  the  joint 
/-transform  correlator. 

/k'k'k'k  k  k'k'k'k  "k'k'k'k 'k’k'k'k  k'k'k'k ‘k'k'k'k  k'k'k'k  k'k'k’k 'k'k'k'k  k'k'k'k  'k  'k  k  ~k  k  k  k  k  k  'k  k  k  k  k  k  'k  k  k  k  k  k  k  k  k  k  V  , 


= include  "stdio.h" 

-include  "string. h" 

-include  "math.h" 

char  targhead[]  =  { '\x00' ,  '\x00',  ’\x03',  '\x00',  '\x00' 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \ xOO ' .  ' \x00 ' 
' \x80' ,  ' \x00 ' ,  ' \x37 ' ,  ' \x00 ' ,  '\x08' 

unsigned  char  inbuffer [ 110 ] [456 j ,  outbuffer [ 55 J  [ 128  ]  ; 
int  combined,  i,  j,  k,  I i ,  j j ; 

FILE  *f ilel ,  *f i le2 ; 

void  main() 
i 

printf ( "reducing  lrt  of  scene\n"); 

/-'open  files  and  handle  headers*/ 
f  i  lel=fopen( "\\t  arga\\grabl r t . tga" . " rb" ) ; 
f  s  e  e  k ( f ilel, 18,0); 

file2-=fopc:n(  "\\t  arga\\scene  .  i  rt"  ,  "wb"  )  ; 
fwr i to ( ta rghead ,  18,  1,  file/); 

/-'read  data  in.  reduce,  and  output*/ 
fread( inbuffer ,  1,  50160,  filel); 
for ( i =0 ;  i<l 10 ;  i t=2 ) 

( 

f o r  ( j  -- 0  ;  j<456;  jt‘4) 

I 

t  omb  ined-  () ; 

f  o  r  ( i  i .  -  i  :  i  i  <  i  t  ?  :  i  i  h  ) 


'  \x00 '  , 
' \x00  ’  . 
'  '  ! 


)'•  > ; •  i 1  •  j.j") 

i 

comb i ned i  i nbu t f e r ;  i i  ,  j  j  j  ; 


) 

outbuffer[i/2] [ j/4+7 ] = ( combined+4 ) /8 

) 

) 

fwrite (outbuf fer ,  7040,  1,  file2); 
fclose(filel) ; 
fclose(file2) ; 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
PROGRAM  FOR  BINARIZING  FRINGES  THE  FOURIER  TRANSFORM 
by  Capt  John  Cline 
September  30,  1989 


y  'k'k^^^c'k'k'k'k'k'k'k'k^'k'k'k'k'k'k'k'k'k'k'k'kic'k'k'k'k'k'k'-k kk-k'k-k'k'k'k'kk'k'k^c-k'kk'k'k'k'k'k 'k 'A'  ~k  k k k  k k  k  kk  k  k  k  / 

/*  FT_TEMP . C  */ 

/*  */ 

/* 

/* 

/* 

/* 

/*  */ 

/*This  program  binarizes  the  Fourier  transform  of  the  original  scene  */ 
/* input  to  a  coordinate  transform  joint  transform  correlator  (before  */ 
/^'coordinate  transforming).  There  are  two  input  files  "  f  t_temp .  tga"  ■/ 
/*and  the  system  bias  file  " f terase . tga"  (created  by  detecting  the  */ 
/*Fourier  transform  of  a  blank  MOSLM) .  The  bias  file  values  are  */ 
/■^subtracted  from  those  of  the  scene  file  and  the  result  is  binarized*/ 
/*on  five  times  the  average  difference  (you  may  want  to  look  at  */ 

/*alternative  binarization  techniques) .  The  binary  array  is  stored  */ 
/*in  TARGA  format  as  "ft_temp.bin"  and  is  displayed  to  the  MOSLM  for  */ 
/*log  polar  coordinate  transformation. 

/'k^^^^i<^^^^i<^'k'k'k'k'k‘k'k'k'k'k‘k'k-^'k'k'k'k'k'k'kic'k'k'k'k-k'k'k^c'k‘k'k'k‘k'k'k'k'k'k'k'k'k'k'i:'k'k'k'k'k'k'^ 'k V; Vr *.V •. V V V  / 


-include  "stdio.h" 

-include  "string. h" 

^include  "math.h" 

int  maxvalue,  i,  j,  k,  test,  x,  y,  col,  row,  index; 
float  combined,  thrshld=0; 

unsigned  char  buf fer in [ 128 ] [ 128 j  ,  temp [128] [128] ; 
unsigned  char  targabuffer } 128 1 [ 128 j ,  slm[ 128 ] [ 64 j ; 
char  targhead [ 18 ] ; 

FILE  *f ilel ; 


void  main() 

( 

prepare_slm( )  ; 

/*get  template  file*/ 

filel=fopen( "\\targa\\f ttemp . tga" , " rb" ) ; 
pr intf ( "\n\nreading  in  data  \n"); 

fread( targhead, 1,18, filel) ;  /*read  he a do r*/ 

fread(bufferin, 1 , 16384 , filel) ; 
fclose(filel)  ; 

/*get  erase  file*/ 

f i le 1 = fopen( "\\targa\\f t  erase. tga " , " rb" ) ; 
fseek( filel  , 18,0)  ; 
f  read ( targabuffer ,1,163 84, filel); 
f c 1 ose (filel)  ; 

/*calculate  threshold  bv  finding  average  difference*/ 
f o r ( row  -0 ;  row< 128;  row+ + ) 


f  o  r  ( c  o  1  -  0  ;  c  o  1  <  1  2  8  ;  c  o  1  t  f ) 


( 

thrshld+=bufferin[ row] [ col ] - targabuf fer [ row] [ col ] ; 

) 

) 

thrshld=5*thrshld/16384 ; 

/*binarize  pixels  based  on  threshold  for  difference*/ 
printf  ( "binarizi  lo  d^..^  \n")  , 
for(row=0;  row<128;  row++) 

I 

for(col=0;  col<128;  col++) 

{ 

combined=buf fer in [ row ] [ col ] - targabuf fer [ row ] (col j ; 
if (combi ned<=thrshld) 

{ 

targabuf fer [ row ] (col]=0x00; 

) 

else 

( 

targabuf fer [ row] [col]=0xff ; 


/*save  binarized  version  */ 
f ilel=fopen( "\\targa\\f t_temp . bin" , "wb" ) 
fwrite ( targhead ,  18,  1,  filel); 
fwrite ( targabuf fer ,  16384,  1,  filel); 
fclose(filel) ; 

convert_targabuffer_to_temp( ) ; 
convt r t_temp_to_s lm( ) ; 
write  to  slm( ) ; 


/kk  kk  kk  : 

prepare_slm( ) 


k'k 


kk 


kk 


char  far  *semetex; 

semetex  *=  (char  far  *)  OxbOOOOOOO ; 
*(semetex+0x800)=l ; 


/  * **  **  y'  *  **  ' 
converttargabuf fer  to  temp( ) 

{ 

for(i=0;  i< 1 2  8 ;  i++) 

( 

for(j-=0;  j  <  L  2  8  ;  j+  +  ) 


,/*clear  slur 


i  f  (  targabuf  fe  r  [  i  ]  i  j  j  OxOt) )  temp  [  L  j  [  j  ]  -0x0  1 
e  1  se  temp  ■  i  ]  [  j  j  --0x00  ; 


) 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 
convert_temp_to_slm( ) 

( 

/^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM*/ 

printf ( "creating  SLM  format  \n"); 
for(x=0;  x<128 ;  x++) 

{ 

for ( j=0 ;  j <16 ;  j++) 

( 

slm[x ] [  4*  j ]  =2* temp [ 126  - 8*j ] [ x ] +  temp [ 127 -8*j ] ( x ] +252 ; 

slm[x] [ 4*j+l ] =8* temp [ 124- 8* j ] [x]+4*temp [  125  - 8*j j [x ] +243 ; 
slm [ x ] [ 4*j  +2 ] =3 2* temp [ 122  - 8*j ] [x] +16* temp [ 123  - 8*j ] [ x 1 +207 ; 
slm [x ] [ 4*j  +  3 ] =128*temp [ 120  - 8*j ] [ x ] +64* temp [ 121  - 8*j ] [ x ] 4  6  3 ; 


/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk 

wr ite_to_slm( ) 

( 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ( "writing  to  the  SLM  \n"); 
for(j“0;  j < 1 6 :  j++) 

( 

for ( x=0 ;  x<128 ;  x++) 

( 

i=x+128*j ; 

*(semetex+i)  =  sim[x][4*j]; 

*(semetex+i)  =  slmfx] [ l+4*j ] ; 

*(semetex+i)  =  s lm ( x J [ 2+4*j ] ; 

*(semetex+i)  =  s lm [ x ] [ 3+4*j ] ; 

I 


*(semetex+0x801 )=1 ; 
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/*  RED_LRT2 . C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  PROGRAM  FOR  REDUCING  FILES  USED  IN  THE  COORDINATE  TRANSFORM  JTC 
/*  by  Capt  John  Cline 

/*  September  30,  1989 

/* 

/*This  program  reduces  a  110x456  TARGA  file  to  55x128  for  display  o 
/*the  SLM  in  the  joint  transform  correlator.  The  reduction  is  done 
/*by  averaging  2  for  1  vertically  and  4  for  1  horizontally.  Zeros 
/*are  added  on  the  left  and  right  sides.  The  file  is  stored  as 
/*" template . lrt" .  This  new  file  is  a  reduced  version  of  the  log 
/*polar  coordinate  transform  of  a  template's  Fourier  features.  It 
/*will  be  binarized  in  another  program,  then  used  as  an  input  to  tli 
/*joint  transform  correlator. 


f  kkkkkkkkkkkkkkkkkkkkkkkkkkkkkk  k  kkkkkk  'k  'k  k  'k  'k  k  'k  k  k  k  k  ~k  k  k  k  k  k  k  k  k  k  k  k  V 


^include  "stdio.h" 
^include  "string. h" 
"include  "math.h" 


char  targheadf ]  -  I'\x00',  '\x00',  '\x03',  '\x00',  '\x00',  ' \x00 '  , 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ’ , 

' \x80 '  ,  ' \x00 '  ,  ' \x37 '  ,  ' \x00 '  ,  '\x08',  '\x00'  |  ; 

unsigned  char  inbuf fer [ 1 10 j [ 456 ] ,  outbuf fer [ 55 ] [ 128 ] ; 
int  combined,  i,  j,  k,  ii,  jj; 

FILE  *f ilel ,  *file2 ; 

void  main() 

( 

printf ("reducing  lrt  of  template\n" ) ; 

/"'open  files  and  handle  headers*/ 
filel=fopen( "\\ targa\\grablrt . tga" , " rb" ) ; 
fseek(filel, 18,0)  ; 

f ile2=fopen( "\\targa\\ template . 1 rt" . "wb" ) ; 
fwrite ( targhead ,  18,  1,  file2); 

/*read  data  in,  reduce,  and  output*/ 
fread( inbuf fer ,  1,  50160,  filel); 
for(i=-0;  i<110;  i+=2) 


for(j=0;  j <466;  jt  4) 

1 

comb  i  tied"  0  : 

fort  i  i  i  ;  i  i  <i  t  2  ;  i  i  1 1  ) 

I 

:  i  j:  !  !  •  :  '  :  j  j  *  *  ) 

\ 


combined i  ^ inbuffer' i  i  j  [  j  j  ’  ; 


) 

outbuf fer [ i/2 ] [ j /4+7 ] =(combined+4)/8 ; 

} 

} 

fwrite (outbuf fer ,  7040,  1,  file2); 
fclose(filel) ; 
fc lose ( f i le2 )  ; 


/  k  'A'  'A'  kkkkkkkkkkkkkkkk  k  k  kkkk  k  kkkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  -A'  k  k  k k  k  k  k  k  * V  /V  Vr  *,V  v 

/*  LRT -  COMB . C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  INPUT  DISPLAY  TO  LOG  POLAR  JOINT  TRANSFORM  CORRELATOR 

/*  by  Capt  John  Cline  > 

/*  SEPTEMBER  30,  1989 

/* 

/*This  program  combines  two  55x128  pixel  TARGA  files,  "scene . lrt"  and- 
/*" template . lrt" ,  to  form  a  single  binary  file  " lrtcomb . tga" .  These- 
/*two  grey  scale  input  files  represent  the  log  polar  coordinate  - 

/^transform  of  the  magnitude  of  the  Fourier  transform  of  a  scene  and  - 
/^template  respectively.  A  third  frame  "erase,  lrt"  is  the  coordinate'- 
/^transform  of  an  erased  MGSLM,  and  represents  a  'system  bias'.  This- 
/*system  bias  is  subtracted  from  each  of  the  other  two  inputs ,  and  - 
/*binarization  is  based  on  the  mean  value  of  the  active  region 
/*(a  55X114  pixel  area  in  each  file)  of  these  two  files  after  the 
/^'subtraction .  Zeros  are  used  to  fill  in  various  unused  regions  of 
/*the  128X128  "  lrt_comb .  tga"  file.  After  creating  this  binary  file,  •' 
/*it  is  written  to  the  SLM  to  begin  a  joint  transform  correlation 
/'-using  coordinate  transformed  magnitude  of  the  Fourier  transform 
/'-'features . 

*/ 

/  *  'k  k  kkkkkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  kkkk  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  V 

-include  "stdio.h" 

^include  "string. h" 

float  thrshld=0; 
int  i ,  j ,  x; 

unsigned  char  s lm [ 128 ] ( 64 ] ,  targabuffer [ 128 ] [ 128 ] ,  erased[ 55] [ 128 ] ; 
unsigned  char  temp ( 128 ][ 128 j ; 

char  targhead[ ]  =  {'\x00',  '\x00',  '\x03',  '\x00',  '\x00',  ' \x00 ’ , 

'\x00' ,  ’ \x00 '  ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 '  ,  '\x00', 

' \x80 ' ,  ' \x00 ' ,  '\x80' ,  ' \x00 ' ,  '\x08',  '\x00'l; 

FILE  *filel; 

void  main() 

( 

prepare_slm( ) ; 

pr int f ( " reading  da ta\n" ) ; 

f i 1 e 1  =  f ope  n ( " \\ t  a r ga\\ temp late. 1 r t " , " rb " ) ; 
fseek(filel ,  1.8 ,0)  ; 
fread( targabuffer , 1 , 7040, filel ) ; 
fclose(filel); 


f i le l=fopen ( "\\ta rga\\scene . lr t " , " rb" ) ; 
fseek( f ilel , 18 , 0) ; 

f read (&targabuf f e r [ 73 ] [01 ,1 , 7040 , f i Le 1 ) ; 
fclose(filel); 


filel=fopen( "\\targa\\erase . lrt" , " rb" )  ; 
fseek(filel,18,0) ; 
f read (erased, 1,7 040, filel) ; 
fclose(filel) ; 

printf( "calculating  thresholds  and  binar izing\n" ) 
for ( j=7 ;  j<121;  j++) 

( 

for(i=0;  i<55;  i++) 

{ 

thrshld+=targabuffer [ i][jj-erased[i][j]; 

) 

) 

thrshld=thrshld/6270 ; 

for(j=7;  j <1 2 1 ;  j++) 

{ 

for(i=0;  i<55;  i++) 

( 

if ( thrshld<targabuf fer [ i][j]-erased[i][jj) 
targabuffer] i j [ j  j=0xff ; 
else  targabuffer [ i ] [ j ]=0x00; 


thrshld=0 ; 

for ( j  =7 ;  j <1 2 1 ;  j++) 

I 

for(i=0;  i<55;  i++) 

( 

thrshld+=targabuf fer [ i  +  73] [j ] -erased[ i]  [j ]  ; 

) 

) 

thrshld=thrshld/62  70 ; 

for(j  =  7;  j <12 1 ;  j++) 

I 

for ( i=0 ;  i<55;  i++) 

( 

i f ( thrshld<targabuf fer [ i+73] [ j  j -erased] i j [ j 
targabuffer [ i+73 ] [ j ]=0xf f ; 
else  targabuffer [i+73] [ j ] =0x00 ; 

} 

) 

for(j=0;  j <7 ;  j++) 

{ 

for(i=0;  i <55;  i++) 

) 

targabuffer] i j [ j ]=0x00 ; 
targabuffer [ i i [ j+121 j =0x00 ; 
targabuf  fer [ i  +  73 ] [ j ] =0x00 ; 
targabuffer] i+  / 3 ] [ j  f 1 2 1 ] =0x00 ; 


) 


} 


f ilel=fopen( "\\targa\\lrt_comb . tga" , "wb" ) ; 
fwrite ( targhead ,18,l,filel) ; 
fwrite ( targabuffer , 1,16384, filel) ; 
fciose(filel) ; 

convert_targabuf fer_to_temp ( ) ; 
convert_temp_to_slm( ) ; 
write_to_slm( ) ; 

> 

/kk  kk  'k'k  kk  kk  kk  irk  kk  k  k  k 

prepare_slm( ) 

( 

char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO; 
*(semetex+0x800)=l ; 


kk  kk 


**/ 


/•»clear  si  in*/ 


hk'k  'kk  kk  k'k  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  ‘ 

convert_targabuf fer_to_temp( ) 

{ 

for(i=0;  i< 128;  i++) 

( 

for ( j  =0 ;  j <1 2 8 ;  j++) 

{ 

if ( targabuffer [ i ] [ j ] ==0x00)  temp [ i ] [ j ] =0x01 ; 
else  temp [ i ] [ j ]=0x00 ; 

) 

) 

) 

/kk  'k'k  k'k  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk  / 

convert_temp_to_slm( ) 

( 

/^convert  2  pixels  into  an  eight  bit  character  for  addressing  the  SLM*/ 

pr intf ( "creat ing  SLM  format  \n"); 
for(x=0;  x<128;  x++) 

{ 

for(j=0;  j < 1 6 ;  j++) 

{ 

slmfx]  [4*j  ]  =2*  temp  [  126  -  8*j  ]  [x  ]  +  temp  [  1  2  7  -  8*  j  j  [  x  ■  +2  S3  : 

s lm [ x ] [ 4*j+l ] -8*temp [ 1 24-8*j ] [ x  J +4*temp [ 12b- 8* j '  [ x  i  i 24 5 ; 
slm  [x  ]  [4*j  -t  2  ]  =3 2* temp  { 122  -  8*j  1  [  x]  +  16* temp  1  12  3  -  8*j  ■  x  •  t  20  ; 
s lm [ x ] [4*j  +  3 ] =12 8* temp [ 120- 8* j J [ x ] i 64* temp ; 121  - 8* j  '  ■ x  '  t  6  ’  : 


kk  kk  kk  kk  kk  k  k  k  k  k  k  k  k  k  k  k 


260 


wr ite_to_slm( ) 


/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
seraetex  =  (char  far  *)  OxbOOOOOOO ; 
printf ("writing  to  the  SLM  \nn); 
for(j=0;  j<16;  j++) 

( 

for(x=0;  x<128;  x++) 

( 

i=x+128*j ; 

*(semetex+i)  =  slm[x][4*j]; 
*(semetex+i)  =  slm[x] [l+4*j ] ; 
*(semetex+i)  =  slm [ x ] [ 2+4*j ] ; 
*(semetex+i)  =  slra[x] [ 3+4*j ] ; 

) 

) 

*(semetex+0x801)=l ; 

} 

/  'k  'k  'k'k'k'k'k'k  *k  ~k  X  x  ~k  ycvcirk  k  -k~k~k  -k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 


/kkkkkkkk'k'k'kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk k 'k  k  k k  k k k k k  j 

/*  TOP-LRT.C  -■/ 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  SCENE  ONLY  DISPLAY  TO  THE  JOINT  TRANSFORM  CORRELATOR 

/*  by  Capt  John  Cline  •'•'/ 

/*  SEPTEMBER  30,  1989  *,/ 

/*  V 

/-This  program  displays  only  the  scene  half  (upper  71x128  pixels)  o [  */ 
/*the  TARGA  file  " lrt_comb . tga"  onto  the  SLM.  This  program  is  part  */ 
/*of  the  coordinate  transform  joint  transform  correlator,  and  is  run  ■•/ 
/-'after  the  scene  and  template  have  been  displayed  together.  */ 

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk k 'A' k k k k k k k k  / 


^include  "stdio.h" 

^include  "string. h" 

int  i ,  j ,  x ; 

unsigned  char  sl.n[  128  ]  [  64  ]  ,  targabuffer [ 128 1 [ 128 ] ,  temp  [  128  ;  '  1 28  j  ; 

FILE  *filel; 

void  main() 

( 

prepare_slm( ) ; 

/*read  in  scene  half  only*/ 
filel=fopen( "\\targa\\lrt_comb . tga" , "rb" ) ; 
fseek(filel, 7314,0) ; 

f read(&targabuf fer [ 57 ] [ 0 ] , 1 , 9088 , f ilel ) ; 
fclose ( f i lei) ; 

convert_targabuf fer_to_temp( ) ; 
convert_temp_to_slm( ) ; 
write_to_slm( ) ; 

) 

/  k  k  kk  kk  k  k  k  k  kk  kk  kk  k  k  k 

prepare _s lm( ) 

{ 

char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO; 

*(semetex+0x800)=l ; 

convert  targabuffer  to  tempt) 

( 

fori iO ;  i < 1 2  8 ;  i +  + ) 

I 

for  (j  0 ;  j  <  1 2  8  ;  jn) 

! 

i  f  ( t  a .  gabuf  for'  i  ’  [  j  i  —  0x00 '  t  oir.p  [  i  ■  ,  j  0:-;O  1  ; 


else  temp [ i ][ j ] =0x00 ; 


} 

) 

) 

/kk  kk  kk  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk  kk  kk  kk  kk 

convert_temp_to_slm( ) 

{ 

/'^convert  2  pixels  into  an  eight  bit  character  for  addressing  t  lie  SLM 

pr intf ( " creat ing  SLM  format  \n"); 
foi (x=0 ;  x<128 ;  x++) 


for(j=0;  j <16 ;  j++) 

{ 

aim [ x] [4*j ]  =2* temp [ 126- 8*j ] [ x ] +temp [ 127  - 8*j j [ x ] +2 52  : 

slm [ x ] [ 4*j  +  1 ] =8* temp [124- 8*j ] [ x j  +4* temp [125- 8*j ]  [ x  j t24 3  ; 
slm[ xl [ 4*j+2 ] =3 2* temp [ 122 - 8*j ] [ x] +16* temp [ 123  - 8* j j [ x ; 4  207  ; 
slm [ x ] [ 4*j+3 ] =128* temp [ 120- 8* j ] [ x ] +64* temp [121- 8*j [ ; x [ t 6  3 : 


/kk  kk  kk  kk  kk  kk 

write  to  slm() 


/*Write  the  SLM  array  to  the  aLM*/ 
char  far  *semetex; 

semetex  =  (char  far  *)  OxbOOOOOOO ; 
pr intf ( "writ ing  to  the  SLM  \n"); 
for ( j  =0 ;  j < 1 6 ;  j  +  4 ) 

{ 

for(x=0;  x<128;  x  +  -t ) 

f 

1 


i =x+ 1 2  8*  j ; 

*( semetex*  i ) 
*(semetex+i) 
*  (  seme  tey-t  i  ) 
* ( seme tex t  i  ) 


s 1 m [ x ] [ 4*j j : 
slm r  x] [1 +4*j j  . 
s 1m [ x ] [ 2+4*  j j  ; 
s lm [ x ] j  3  +  4*j ;  ; 


* ( seme tex i 0x801 ) -  1  : 


/  k  'A'  k  kkkk  k  k  k  kkkkkkkkkk  k  k  k  kk\  k  k  kkkkkkkk 

BULL- LRT . C 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
CORRELATION  PEAR  LOCATOR  FOR  THE  JOINT  TRANSFORM  COR 
USING  LOG  POLAR  COORDINATE  TRANSFORM  INPUTS 
by  Capt  John  Cline 
<  September  30,  1989 

'This  program  finds  the  top  lb  values  in  the  top  and  hot; 
'correlation  regions  of  the  joint  transform  correlator  n: 
-plane  file  "corr  .lit",  I *.  rewrites  ihe  correlation  p  la; 
'-^crosshairs  at  these  peak  locations  in  the  cress  correiat 
to  the  file  "max.lrt".  It  also  displays  the  coordinates 
*of  these  peaks  on  the  computer  monitor. 
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for(j=0;  j < 1 2 8  ;  j++) 


targabuf fer [ i ] [ j ] =0x00 ; 


/*locate  the  15  max  values  on  the  top*/ 
for ( i=150 ;  i<200,  i++) 

{ 

for ( j=0 ;  j < 1 2 8 ;  j++) 

I 

i f ( targabuf fer [ i j [ j ] >=100) 

( 

if (toptest<15)  toptest++; 
k=14 ; 

while(targabuffer[ 1 ] [ j ]  >topvalue[kj  &&  k>  0 ) 

( 

topval ue [ k+ 1 ]= topva lue j k ] ; 

topx  [  k-+ 1  ]  =  topx  [  k  j  ; 

topy [ k+1 ] =topy [ k] ; 

topva lue [ k] =targabuf fer [ L] | j ] ; 

topx [ k ] =j ; 

topy [ k ’ =i ; 

k  -  - 


/'^locate  15  max  values  on  the  bottom*/ 
for(i=0;  i<50;  i++) 
l 

for(j=0;  j  < 1 2  8 ;  jtt) 

( 

i f ( targabuf fer: i ] [ j ] >-100) 

( 

i  f  ( hot tes t <  1  5 )  bo 1 1 os  t  +  +  ; 
k  - 14  ; 

wh  1 1  e  ( targabuf  for  [  i  -j/  j  •  '-hot  va  lue  '  k  &A  k  •  !l 
I 

botval  no  ■  k  +  1  ■  --botvaiuc  ,k'  ; 
hot  x  [k+1  ]  =  hot  x  f  k’j  ; 
ho t v ’ k  t 1  .  -  hot v ’ k  ’  ; 


hot  va  1  Mi ■  k 
hot  k  j  ; 
ho t  v " k  i  : 


t  nrgahu  i  t  e  r  i  ’  j 


f  ■■  ’  .  .  :  .  I 


■  ro  I 


for(j=0;  jcbottest;  j++) 

I 

for(i=-3;  i<4 ;  i4+) 

( 

targabuf fer [boty [ j ] +i ] [ botx [ j ] ] =0x00 ; 
targabuffer [boty[ j ] ] [botx[j ]+i ]=0x00; 

1 

) 

for(j=0;  j<toptest;  j++) 

{ 

for(i=-3;  i<4 ;  i++) 

( 

targabuf fer [ topy [ j ]+i] [topx[j ] ] =0x00 ; 
targabuf fer [ topy [ j ] ] [topx[j ]+i] =0x00 ; 

) 


printf ( "writing  correlation  file\n"); 
f il ^l=fopen( "\\targa\\max . lrt" , "wb” ) ; 
fwr ite < targhead ,18,l,filel)  ; 
fwrite ( targabuf  fer, 25600, l.filel); 
fclose ( f ilel ) ; 


for(i=0;  i< 1 5 ;  i++) 


) 


pr  int  f  (  "  %u\t%u\t%u\t%u\t.%u\t%u\n"  ,  topx  [  i  ]  , 

botx [ i j , 


Copy  j  i  '  , 
boty [  i  ’  , 


t  op va  1  ut- '  i  ’  , 
bo  l va 1 ue [ i ' ) ; 


printf ("press  any  key  to  continue"); 
ge  tch ( ) ; 


/~k'k'k'k'k'fc'k'k'k'k'k'k'k'k'k‘k'k'k'k'k'k'k'k'k'k'k'-k‘k'k'k'k''k'$:''k'k'k‘'k'k~k'k'k  'k  ~k  k  k  ~k  ~k  'k  'k  >V  'k  k  k  k  k  vV  'J:  vV  vV  V-r  vV  vV 

/*  DISP_LRT . C 

/* 

/*  AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 

/*  INPUT  FILE  MAKER  FOR  THE  COORDINATE  TRANSFORM  JTC 

/*  by  Capt  John  Cline 

/*  September  30,  1989 

/* 

,/*This  program  creates  an  array  with  two  squares,  one  of  which 
/'"'scene)  whose  size  the  user  can  specify,  and  saves  them  in  the 
/"'file  "displ ay2 .  tga"  .  This  file  will  be  used  to  correlate  in 
/'-^coordinate  transform  feature  space.  The  programs  DISPTOP.C  ( 
/'■in  the  JTC)  and  DISPBOT.C  will  display  these  two  patterns  on 
/*M0SLM  one  at  a  time,  so  their  Fourier  features  can  be  collect 

/  A  A  A  ~k  k  k  k  A  A  "k  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  A  -X  A  w  A  A  A  A  'A'  -A-  A'  A  A  -A-  -A-  -A-  -A  A  A  A  A-  A  A  A-  A  A  A 


(  l  he 
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^include  "stdio.h" 

^include  "string. it" 

^include  "math.h" 

int  col,  row,  length; 

char  targheadf ]  =  I'\x00',  '\x00',  '\x03',  '\x00',  '\x00', 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \ xOO ' , 

'\x80' ,  ' \x00 ' ,  ' \x80 ' ,  ' \x00 ' ,  '\x<)8'. 
unsigned  char  targa [ 1 28 ] [ 1 28 ] ; 

FILE  *f  i lei; 

void  ma in ( ) 

I 

/'"'get  square  Lengths  and  open  file*/ 

pr int f (" Enter  scene  square  length  of  side  (odd  &  max  of 
scanf ( " %d" , ^length) ; 

printf ( "calculating\n" ) ; 

/‘"'zero  the  matrix*/ 
f o r ( c o 1 =  0 ;  col <128;  col  +  t) 

I 

for (row-0;  row<128;  row** ) 

I 

t  nrga [ row j  [ co 1  j  -  0 ; 


/■■■write  the  scene  square*/ 

t  or  (  co  1  -  (>h  -  i  1  engt  h  -  1  )  / ?  ;  co  1  •  *>  >  *  (  1  engt  Ii  -  1  )  /  '  :  col;*  ) 

) 

f  or(  t'(  w  1  03  -  (  1  engt  h  •  1  )  /  ?  :  row-  1  Ob  *(  1  engt  h  -  1  >/,’;  row  it  - 
t  a  *■*’,.  *  ■  row  1  :  col  -  >  o : 


9  3  )  ;  \  n  "  ! 


/*write  the  template  square*/ 
for(col=57;  col<72;  col++) 


for(row=15;  row<30;  row++) 

{ 

targa[row] [col]=255; 


/*save  TARGA  file*/ 

printf ( "writing  TARGA  file  to  targa\\display2 . t.gr.\  n" ) : 

f ilel=fopen( "\\targa\\display2 . tga" , "wb" ) ; 

fwr ite ( targhead ,  18,  1,  filel); 

fwr ite ( targa ,  16384,  1,  filel); 

fclose (filel)  ; 


/  ~k  'k  'k  'k'k'k'k'k'k  "k  ~k  'k  'k'k'k'k'k'k'k'k  'k  'k  ~k  'k  'k  'k  'k  'k  ~k  ~k  'k  'k  ~k  'k 


'  r,  h 


1 
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/*  LRT-180.C 

/* 

/* 

/* 

/* 

/A- 
/  '* 

/* 

/'A'This 
/*"  temi 


AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
INPUT  DISPLAY  TO  LOG  POLAR  JOINT  TRANSFORM  CORRELATOR 
by  Capt  John  Cline 
SEPTEMBER  30.  1989 


inch 


The 


program  combines  two  55x128  pixel  TARGA  files,  "scene,  lr 
Iate.lrt",  to  form  a  single  binary  file  "lrt  comb . t ga" . 

/"'two  grey  scale  input  files  represent  the  log  polar  coordinate 
/'"'transform  of  the  magnitude  of  the  Fourier  transform  of  a  scene  and  * 
/^'template  respectively.  A  third  frame  "erase,  lrt"  is  the  coord  incite* 
/^transform  of  an  erased  MOSLM,  and  represents  a  'system  bias'.  This* 
/^system  bias  is  subtracted  from  each  of  the  other  two  inputs,  and  * 
/*binarization  is  based  on  the  mean  value  of  the  active  region 
/*' ( a  55X114  pixel  area  in  each  file)  of  these  two  files  after  the  * 
/^'subtraction .  Zeros  are  used  to  fill  in  various  unused  region:;  cf  * 
/*'the  128X128  "  lr  t_comb .  tga "  file.  After  creating  this  binary  file,  * 
/*it  is  written  to  the  SLM  to  begin  a  joint  transform  correlation 
/*'using  coordinate  transformed  magnitude  of  the  Fourier  transform  * 
/^features.  THE  DIFFERENCE  BETWEEN  THIS  AND  LRT -COMB  IS  THAT  ONLY 
/*AB0UT  THE  CENTER  180  DEGREES  OF  THE  360  TEMPLATE  IS  USED. 

/kk'kkk'k'kkkkkkkk'k'k'kk'kkk'kk'kk'kkkkkk  ■ k  'k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k  k 

^include  "stdio.h" 

"include  "string. h" 

float  thrshld=0; 
int  i ,  j ,  x ; 

unsigned  char  slm[128] {64 j ,  targabuf f or [ 128 •  •  128 J  ,  erased , 56 L 1;>K ; ; 
unsigned  char  temp [ 128 ] [ 128 j ; 

char  t.arghead[  ]  =  {  '\x00'  ,  '  \x00 '  ,  '\x03'  ,  '  \x00 '  ,  '  \xt)0 '  ,  '  \x()0’  . 


’ \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' 
'  \x80 '  ,  '  \x00 '  ,  '  \x80 '  ,  '  \x0() ' 


'  \x00  '  ,  '  \ :■ 

'  \x()8  '  ,  '  \> 


00 ' 
00 ' 


FILE  *filel ; 

void  main() 

{ 

prepare_slm( ) ; 


printf ("reading  data\n")  ; 

f i  le 1 =f open ( "\\t  a rga\\t  emp Iate.lrt"." rb" )  : 
f seek ( f i le 1 , 18 , 0 ) : 
f read ( targabuf f e r , 1 , 7040 , f i lei  )  ; 
f  c lose ( f i 1  el  )  ; 

f i  1  el  =  f op°n ( "\\t arga\\sceiv- . lrt "  ,  "rb")  ; 

I  seek ( f i 1  el , 18,0) ; 

f  read ( &t argabuf fer [ / 3 ; [ 0  j , 1 , 7040 , f i le 1 ) : 
f  c.  lose  (111  e  1  )  ; 


,U,<t 


f ilel=fopen( "\\targa\\erase . lrt" , "rb" ) ; 
fseek(fi lei, 18,0) ; 
f re ad (erased, 1,7 040, filel) ; 
fclose(filel)  ; 

printf ( "calculating  thresholds  and  binar izing\n" ) ; 

for ( j=7 ;  j <1 2 1 ;  j++) 

( 

for ( i=0 ;  1<55 ;  i++) 

{ 

thrshld+=targabuf fer [ i ] [ j ] -erased] i ] [ j ] ; 


thrshld=thrshld/6270; 

for(j=7;  j<35;  j++) 

( 

for(i=0;  i <  5  5 ;  i  +  +) 

I 

tar gabuf fer ] i j [ j  j =0x00 ; 
targabuf fer [ i] [ 127 -j 1=0x00; 


for(j=35;  j<93;  j++) 

( 

for(i=0;  i<55;  iff) 

( 

i f ( thrshld< targabuf fer [ i j [ j ] -erased ] i ] j  j ] ) 
targabuf fer [ i ) [ j ]=0xf f ; 
else  targabuf fer [ i ] (j ] =0x00 ; 


thr shld=0 ; 

for ( j  =  7 ;  j <1 2 1 ;  j  +  +  ) 

1 

for ( j  =0 ;  i <  5  5 ;  i (  +  ) 

( 

thrshl df= targabuf for [ i  +  73  j ] j ] -erased] i 1 ] j  J  ; 


t.hrsh  1  d  =  th  rsh  1  d/62  70  ; 

for(j  =  7;  j < 1 2 1 ;  jtf) 

( 

f  or  ( i  -0  ;  i < 5  b  ;  '•  +  f  ) 

! 

if  ( th.rshl  d<t  argabuffer  [  i  +  7  i  ’  i  j  ;  -  erased  [  i  ]  j  j  ]  » 
targabuf  for  [  i  t  i  ;  I  j  Oxf  f  ; 
else  targabuf for  1 i t 73,  ’ j ]  -OxOU; 


7  7 1 ) 


for(j=0;  j <7 ;  j++) 


I 

for ( i=0 ;  i<55;  i++) 


( 

targabuffer[i] [j ]=0x00 ; 
targabuf fer ( i ] [ j  +121 ]=0x00 ; 
targabuf fer [ i+73 ] [ j ]=0x00 ; 
targabuf  fer[i+73] [j+121] =0x00 ; 

} 


/*write  the  binary  file*/ 

f ilel=fopen( "\\targa\\lr t_comb . tga” , ”wb” ) ; 
fwrite ( targhead ,18,l,filel) ; 
fwrite ( targabuf fer ,1, 16384, filel); 
fclcsc(filei) ; 

conver t_targabuf fer_to_temp( ) ; 
convert_temp_to  slm(); 
write_to_slm( ) ; 


/  k  k  kk  kk  'k  'k  k'k  k  ~k  kk  'k'k  k  'k 

prepare_slm( ) 


char  far  *semetex; 

semet.ex  =  (char  far  *)  OxbOOOOOOO: 

*(semetex+0x800)=l  ; 


/'k'k  k'k  kk  kk  kk  kk  kk 

conver t_targabuf  fer_t.o_temp( ) 

I 

for(i=0;  i< 1 2  8 ;  i  +  +) 

( 

for(j=0;  j  < 1 2  8 ;  j++) 

( 

i  f  ( targabuf  fer  [  i]  [j  ]-~0x()0)  temp;  i.  ]  ■  j  1=0x01  ; 
else  temp [ i j [ j ] =0x00 ; 


convert  temp  to  slm() 

/*eonvert  2  pixels  into  an  eight  bit  character  fm 

pr  i  nt  f  (  "c  rent  i  ng  SLM  format  \n"  ); 
for(x=0;  x<128;  x+t) 

( 

fo r ( j  =0 ;  j  < 1 6  ;  j  t  t  ) 


c  1  ea  r  s  1  nr-v/ 


addressing  t!u  SLM 


( 


slm [x ]  [4*j  ]  =2*temp[126-8*j  ]  [ x ] +temp  [127-8  *j  j  [xj  1252  ; 

slm [ x } [ 4*j  +1 ] =8* temp [ 124  - 8*j  j [ x ] +4* temp [ 125  - 8*j ] [ x ) +243 ; 
s lm [ x ] [ 4*j  +2 ] =3 2* temp [ 122  - 8*j ] [ x ] +16* temp [ 12 3  -  8* j j [ x ' t  2 0  /  ; 
slm( x ] [ 4*j  +3 ] - 1 28* temp [ 120  - 8*j 1 [ x ] +64* temp [ 121 -  8* j J [ x ; i 63 : 


/kk  kk  'k'k  kk  kk  kk  kk  kk  k  k  k  kk  kk  kk  kk 

write  to__slm( ) 

l 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO; 
printf  ( "wr i t mg  to  the  SLM  \n" )  ; 
for(j=0;  j < 1 6 ;  j++) 

( 

for (x=0 ;  x<128 ;  x++) 

i 

i=x+128*j ; 

*(semetex+i)  =  slm[x][4*jj; 

*(semetex+i)  =  slm[x] [ l+4*j ] ; 

*(semetex+i)  =  slm [ x ] [ 2+4*j ] ; 

*(semetex+i)  =  slm[x] ( 3+4*j ] ; 


*(semetex+0x801)=l : 

! 

/ k k k k  kkkkk  kkkkkk  k k kkkkk k k k ' 


/kkkkkkk'k’k'kkk'k'kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk  kki 

/*  LRT-NEG . C 
/* 

AIR  FORCE  INSTITUTE  OF  TECHNOLOGY 
INPUT  DISPLAY  TO  LOG  POLAR  JOINT  TRANSFORM  CORRELATOR 
by  Capt  John  Cline 
SEPTEMBER  30,  1989 


V 

/ 


/* 

/* 

/* 

/* 

/* 

/-This  program  combines  two  55x128  pixel  TARGA  files,  "scene,  lrt"  and* 
/^"template . lrt" ,  to  form  a  single  binary  file  " lrtcomb . tga" .  These 
/*two  grey  scale  input  files  represent  the  log  polar  coordinate 
/^transform  of  the  magnitude  of  the  Fourier  transform  of  a  scene  and 
/'-template  respectively.  A  third  frame  "erase,  lrt"  is  the  coordinate 
/^transform  of  an  erased  MOSLM,  and  represents  a  ’system  bias’  .  This 
/'-system  bias  is  subtracted  from  each  of  the  other  two  inputs,  and 
/'-binarization  is  based  on  the  mean  value  of  the  active  region 
/*(a  55X114  pixel  area  in  each  file)  of  these  two  files  after  the 
/-subtraction.  Zeros  are  used  to  fill  in  various  unused  regions  ot. 
/*the  128X128  " lrt_comb . tga"  file.  After  creating  this  binary  file, 
/'-'it  is  written  to  the  SLM  to  begin  a  joint  transform  correlation 
/fusing  coordinate  transformed  magnitude  of  the  Fourier  transform 
/-'features  .  THE  DIFFERENCES  BETWEEN  THIS  AND  LRT -COMB  ARE  THAT  ONLY 
/-ABOUT  THE  CENTER  180  DEGREES  OF  THE  360  TEMPLATE  IS  USED,  AND  THE 
/'-'TEMPLATE  IS  NEGATIVE. 

/  k k kkkkkkkk k 'k 'k 'k : k k k k k k k k k k k k k k k  k  k k k k k k k k k k k k k k k k k k  k k k k k k  k k k k k k k k k  k  k  k  k  k 

“include  "stdio.h" 

“include  "string. h" 


••  / 


float  thrshld=0; 
i  n  t  i  ,  j  ,  x  ; 

unsigned  char  s lm[ 128 ] [ 64 ] ,  targabuf fer [ 1 28 1 [ 128 j 
unsigned  char  temp [ 128 ][ 128 1 ; 

char  targhead[ ]  =  {'\x00',  '\x00',  '\x03',  '\x00' 

' \x00 ' ,  ' \x00 ' ,  ' \x00 ' ,  ' \x00 ' 
' \x80 ' ,  ' \x00 ' ,  ' \x80 ' ,  ' \x00 ' 


erased ’ 55  i  :  1 ?S  ' 


’  \x()()  ’ 
’ \x00 ’ 
’  \  x  ()  8  ’ 


’  \x00 '  , 
’  \x00  ’  , 
'  \xOO  ’  ! 


FILE  * f i 1 e 1 ; 


void  main() 

prepare  slm( ) ; 

pr int f ( " read i ng  dat  a\n" ) ; 

file l -f open ( "\\t  arga\ \temp  La te . I r t " . ” rb" ) ; 
f seek(fi lei ,18.0); 
f read( targabuf f er , i , 7040, f ilel ) ; 
fclose(filel); 

filel=fopen( "\\ targa\\scene . lrt", " rb " ) ; 
f scck(fiiel , 18,0); 

f read(Ntargabuf for [ 7 3 ] [ 0 ]  ,1  , 7040 , f  i  lei ) ; 
f  c 1 ose ( f i le 1 ) ; 


f ilel=f open ( "\\targa\\e rase . lrt" , "rb" ) ; 
fseek( f ilel ,18,0); 
f read (erased, 1,7 04 O.filel) ; 
fclose ( f ilel )  ; 

printf ( "calculating  thresholds  and  binarizing\n" ) ; 
for ( j=7 ;  j <121 ;  j++) 

( 

for(i=0;  i<55;  i++) 

( 

thrshld+= targabuf fer [ i ] [ j ]-erased[ i ] [ j j ; 

) 

] 

thrshld=thrshld/6270 ; 

f or ( j  =7 ;  j <3 5 ;  j++) 

I 

for(i=0;  i<55;  i+t) 

I 

targabuf fer [ ij [j ]=0x00; 

targabuf fer [  i j [  127- j  j =0x00 ; 

1 


for(j  =  35;  j  <-  9  3  ;  j+  +  ) 

I 

for(i=0;  i  <  5  5 ;  i  +  +) 

( 

i f ( thrshld<targabuf  f er  [  i j  [  j  j  -erased! i j  j  j i ) 
targabuf fer  f i ] [ j ]=0x00 ; 
else  targabuf fer [ i j [ j ] =0xf f  ; 


thrshld=0 ; 

for  ( j  =  7  ;  j <12 1 ;  j-t  +  ) 

( 

for ( i=0 ;  i<55;  3++) 

( 

thrsl:  id+=targabuf  fer  j  L(  73’  [  j  )  -erased;  i  j  j  j  ’  ; 


thrshld-thrshld/6? 70 ; 

fori j“7 :  j < 1 2 1 ;  j  t  i  ) 

( 

for(i’0;  i<55;  iff) 

( 

i  f  ( thrsh  1  d<t argabuf fer  (  i  *■  73  i  [  j  '  -erased'  i  ;  '  j  ’  ) 
targabuf fe r ( i (73  j [ j ] =0xf  f ; 
e 1 se  targabuf fer [ L ( 7  $  j [ j  j =0x00 ; 


for ( j=0 ;  j<7;  j++) 

( 

for(i=0;  i<55;  i++) 

( 

targabuf f er [ i ] [ j ]=0x00 ; 
targabuffer [ i ] [ j+12i ] =0x00 ; 
targabuffer [ i  +  73  j [ j ]=OxOG, 
targabuf fer [ i+73 ] [ j  +121 ]=0x00 ; 

) 


/*write  the  binary  file*/ 

filel=fopen(  "\\targa\\l  rt._comb  .  tga"  ,  "wb"  )  ; 
fwrite ( targhead , 18,1, filel) ; 
fwr ite ( targabuffer ,1,163 84, filel); 
fclose(f ilel) ; 

convert_targabuf  fer_to_t.emp( )  ; 
convert_temp__to_slm( )  ; 
write  to  slm( ) ; 


prepare_slm( ) 

( 

char  far  *semetex; 

sernetex  =  (char  .r  *)  OxbOOOOOOO ; 

*(setnetex+0x8o«j/-l :  /*cleur  s  1 i::-- 


/'k'k  'k'k  -k'k  k-k  k'k  k-k  k  k  'k  'k  'k  'k  k  'k  k  'k'k  kk  k 

conve r t_ targabuf f er_to  temp ( ) 

for ( i  -0 ;  i < L 2 8 ;  i++) 

( 

for(j=0;  j <  1 2 8  ;  j  t-+) 

/ 

) 

i f ( targabuffer [ i j [ j  j ==0x00  )  t  crop [ i  ■  [  j ] =0x01  ; 
else  temp [ i ] [ j ] =0x00 ; 

) 

\ 


convert  temp  to  'lm() 

/'^convert.  2.  pixels  into  an  eight  bit  character  for  a«Ulr»  using  tl.i  SIM- 

print  f  (  "  c  re  a  ting  SI  „M  f  o  rma  t  >,n  "  )  ; 

for(x=0;  :< <  1  28  ;  t  ) 


2  /  a 


for(j=0;  j<16;  j++) 


{ 

slm  [x]  [4*j  ]  =2*temp [  126 - 8* j  ]  _  x  ]  +teinp  [ 127 - 8*j  j ' x ; +  2 52  ; 
slm  [  x  ]  ( 4*j  +1  j  =8* temp  [  124  -  8* j  j  [ x  ]  +4* temp  [  1 2 5  -  8* j  ]  [  3  ; 

slm [ x] [ 4*j  +2 ] =3 2* temp [ 122  - 8*j j [ x ]  +  1 6* temp [ 12  3  -  8 * j  ’  ' x ' +2U 7  ; 
slm[x  J [4*j+3 ] =128*temp [ 120- 8*j ] [ x ] +64* temp j 12 1  -  8*  j  ’  ’ x  '  *61; 

) 

) 

/kk  kk  kk  k'k  kk  k'k  kk  kk  k  k  k  kk  k  k  kk  k  k  kk  kk  kk 

write_to_slm( ) 

I 

/*Write  the  SLM  array  to  the  SLM*/ 
char  far  *semetex; 
semetex  =  (char  far  *)  OxbOOOOOOO ; 
printf( "writing  to  the  SLM  \n" ) ; 
for(j=0;  j<16;  j++) 

{ 

for(x=0;  x<128;  xt+) 

( 

i-x+128*j ; 

*(semetex+i)  =  slm[x][4*j|; 

*(semetex+i)  »  slm[ x ] [ l+4*j j ; 

*(semecex4i)  =  slm [ x ] [ 2+4*j i ; 

* (seme tex+ 1 )  =  s lm  j  x ] f  3 f4*j ]  ; 

J 

) 

*(semetex+0x801)=l ; 

} 


BIBLIOGRAPHY 


1.  Goodman,  J.  W.  Introduction  to  Fourier  Optics.  New 
York:  McGraw-Hill  Book  Company,  1968. 

2.  Casasent,  David  and  Demetri  Psaltis.  "Position, 

Rotation,  and  Scale  Invariant  Optical  Correlation," 
Applied  Optics.  15:  1795-1799  (July  1976). 

3.  Rogers,  Steven  K.,  and  others.  "Position,  Scale,  and 
Rotation  Invariant  Optical  Pattern  Recognition  for 
Target  Extraction  and  Identification,"  submitted  to 
Applied  Optics  for  publication  in  mid  1990. 

4.  Horev,  Moshe.  Picture  Correlation  lodel  for  Automatic 
Machine  Recognition.  MS  thesis,  AFIT/GE/EE/80D-2 5 . 
School  of  Engineering,  Air  Force  Institute  of  Technology 
(AU) ,  Wr ight-Patterson  AFB  OH,  December  1980 
(AD-A100765) . 

5.  Kobel,  Capt  William  G.  and  Timothy  Martin.  Distortion 
Invariant  Pattern  Recognition  in  Non-Random  Noise .  MS 
thesis,  AFIT/GE/ENG/86D-20 .  School  of  Engineering,  Air 
Force  Institute  of  Technology  (AU) ,  Wr ight-Patterson  AFB 
OH,  December  1986  (AD-A177598)  . 

6.  Troxel,  1st  Lt  Steven  E.  Position.  Scale,  and  Rotation 
Invariant  Target  Recognition  Using  Range  Imagery.  MS 
thesis,  AFIT/GEO/ENG/87D-3 .  School  of  Engineering,  Air 
Force  Institute  of  Technology  (AU) ,  Wr ight-Patterson  AFB 
OH,  December  1987. 

7.  Miazza,  Capt  David  J.,  and  others.  "Optical  In-Plane 
Distortion  Invariant  Pattern  Recognition  in  Structured 
Noise,"  Proceedings  of  the  SPIE,  939:  34-39  (April 
1988)  . 

8.  Mayo,  2nd  Lt  Michael  W.  Computer  Generated  Holograms 
and  Magneto-Optic  Spatial  Light  Modulator  for  Op t ic a  1 
Pattern  Recognition.  MS  thesis,  AFIT/GEO/ENG/87D- 1 . 
School  of  Engineering,  Air  Force  Institute  of  Technology 
(AU) ,  Wr ight-Patterson  AFB  OH,  December  1987. 

9.  Childress,  Capt  Timothy  G.  and  Capt  J.  Thomas  Wulrond. 
Pos i tion.  Scale,  and  Rotation  Inva riant  Op t ica  1  __Pa 1 1 e r n 
Recognition  for  Target  Ext  v~  -  ction  and  Identi  f  icat  i  on  . 

MS  thesis,  AFIT/GE/ENG/88D  ..  School  of  Engineering, 

Air  Force  Institute  of  Technology  (AU) ,  Wright- 
Patterson  AFB  OH,  December  1988. 


2  77 


10.  Weaver,  C.  S.  and  Joseph  W.  Goodman.  "A  Technique  for 
Optically  Convolving  Two  Functions,"  Applied  Optics. 

5:  1248  (July  1966) . 

11.  Javidi,  Bahram,  Don  A.  Gregory  and  Joseph  L.  Horner. 
"Single  Modulator  Joint  Transform  Correlator 
Architectures,"  Applied  Optics.  28:  411  (February 
1989)  . 

12.  Hill,  Capt  Marvin  L. ,  Feature  Extraction  Using  Hough 
Transforms .  MS  Thesis,  AFIT/GE/ENG/87D-24 .  School  of 
Engineering,  Air  Force  Institute  of  Technology  (AU), 
Wright-Patterso.n  AFB  OH,  December  1987. 

13.  Florence,  James  M.  "Joint-transform  Correlator  Systems 
Using  Deformable-mirror  Spatial  Light  Modulators," 
Optics  Letters.  14:  341-343  (April  1989). 

14.  "Signal  Detection  by  Complex  Spatial  Filtering,"  IEEE 
Transactions  on  Information  Theory  IT-10,  139-145 
(1964)  . 

15.  Javidi,  Bahram.  "Comparison  of  Bipolar  Nonlinear 
Correlators  and  Phase-only  Encoded  Matched  Filter 
Correlators,"  Proceedings  of  the  SPIE.  956:  94-103 
(1988)  . 

16.  Gregory,  Don  A.,  Jeffrey  A.  Loudin,  and  Francis  T.  S. 
Yu.  "Illumination  Dependence  of  the  Joint  Transform 
Correlation,"  Applied  Optics.  28:  3288-3290  (August 
1989)  . 

17  Kabrisky,  Dr.  Mathew,  Professor.  Lecture  notes  taken 
in  EENG  620,  Pattern  Recognition  I.  School  of 
Engineering,  Air  Force  Institute  of  Technology  (AU) , 
Wright-Patterson  AFB  OH,  1989. 

18.  Yu,  Francis  T.  S.,  and  others.  "Effects  of  Fringe 
Binarization  of  Multiobject  Joint  Transform 
Correlation,"  Applied  Optics.  28:  2988-2990  (August 
1989)  . 

19.  Hughes,  Capt  Kenneth  D.  Suitability  and  Applications 
of  Liquid  Crystal  Televisions  In  Optical  Pre¬ 
processors  .  MS  thesis,  AFIT/CE/ENG/86D-6 .  School  of 
Engineering,  Air  Force  Institute  of  Technology  (AU) , 
Wright-Patterson  AFB  OH,  December  1986. 

20.  Cederquist,  J.  and  A.  Tai.  "Computer  Generated 
Holograms  for  Geometric  Transformations,"  Appl ied 
Optics ,  23:  3099-3104  (September  1984). 


278 


21.  Lee,  Andrew  J.,  Appendix  to  PhD  dissertation,  title 
unknown.  Carnegie  Mellon  University  PA  (about  1986) . 
Made  available  through  Major  Steven  Rogers,  School  of 
Engineering,  Air  Force  Institute  of  Technology  (AU) , 
Wrighc-Patterson  AFB  OH. 

22.  Logue,  James,  Engineer.  Telephone  interviews. 
Electro-Optics  Technology  Division,  Perkin-Elmer 
Corporation,  Danbury  CT,  September  1989. 

23.  Zweig,  David,  Engineer.  Telephone  interview. 
Electro-Optics  Technology  Division,  Perkin-Elmer 
Corporation,  Danbury  CT,  September  1989. 

24.  Ayer,  Capt  Kevin,  Gabor  Transforms  for  Forward  Looking 
Infrared  Image  Segmentation.  MS  thesis, 
AFIT/GEO/ENG/89D-1 .  School  of  Engineering,  Air  Force 
Institute  of  Technology  (AU) ,  Wr ight-Patterson  AFB  OH, 
December  1989. 

25.  Roggemann,  Capt  Michael  C. ,  Multiple  Sensor  Fusion  for 
Detect-ing  Targets  in  I-uiR  and  Kange  Imagery.  PnD 
Dissertation,  AFIT/DS/ENP/89-1 .  School  of  Engineering, 
Air  Force  Institute  of  Technology  (AU) ,  Wright- 
Patterson  AFB  OH,  1989. 

26.  "Semetex  Corporation  SIGHT-MOD  Development  System 
Operations  MAnual,"  Revised  30  November  1987.  Semetex 
Corporation,  Torrance  CA. 

27.  Waas,  Jay,  Engineer.  Telephone  interview.  Semetex 
Corporation,  Torrance  CA,  November  1989. 

28.  "AT&T  Truevision  Advanced  Raster  Graphics  Adapter 
TARGA  8  User's  Guide,"  Release  3.1,  19  October  1985. 
AT&T  Electronic  Photography  and  Imaging  Center, 
Indianapolis  IN. 

29.  "Truevision  TARGA  Software  Tools  Notebook,"  Release 
4.0,  August  1988.  Truevision  Inc.,  Indianapolis  IN. 

30.  "Truevision  TARGA  Demonstration"  disk,  1986  release. 
AT&T  Electronic  Photography  and  Imaging  Center, 
Indianapolis  IN. 

31.  "TARGA  Software  Tools  -  Library  Disk,"  Version  4.0, 

19  May  1988.  Truevision  Inc.,  Indianapolis  IN. 

32.  "Truevision  Trutilities"  disk,  Version  1.1,  22  May 
1989.  Truevision  Inc.,  Indianapolis  IN. 

33.  "TARGA  Software  Tools  -  Utilities  Disk,"  Version  4.0, 

19  May  1988.  Truevision  Inc.,  Indianapolis  IN. 


279 


34.  "SONY  CCD  B/W  Video  Camera  Module  XC-38,"  XCM-38,  1086. 

Sony  Corporation,  Japan. 

35.  Ruck,  Capt  Dennis,  PhD  student.  Personal  interviews. 
Air  Force  Institute  of  Technology,  Wright-Patterson  AFB 
OH,  November  1989. 

36.  "Spiricon  2250/2509  System  Manual,"  Version  1.11,  7 
December  1988.  Spiricon  Inc.,  Logan  UT. 

37.  "Spiricon  CQ-3D"  disk,  Version  5.0.  Spiricon  Inc., 
Logan  UT, 

38.  "Series  150  Configuration  Manual,"  47-S15006-01 . 

Imaging  Technology  Inc.,  Woburn  MA. 

39.  Perez,  Osvaldo,  Engineer-  Personal  interviews. 
Aeronautical  Systems  Division  (ASD\ENAML) ,  Wright- 
Patterson  AFB  OH,  January  -  November  1989. 

40.  Clay,  Bruce,  Engineer.  Personal  interview.  Air  Force 
Institute  of  Technology  (AFIT/EN) ,  Wright-Patterson  AFB 
OH,  November  1989. 

41.  Childress,  Capt  Timothy,  Engineer.  Personal 
interviews.  Foreign  Technology  Division  ( FTD) ,  Wright- 
Patterson  AFB  OH,  July  -  August  1989. 

42.  Rau,  James  E. ,  "Detection  of  Differences  in  Real 
Distributions,"  Journal  of  the  Optical  Society  of 
America .  56:  1490-1494  (November  1966). 

43.  Javidi,  Bahram  and  Joseph  Horner.  "Single  Spatial 
Light  Modulator  Joint  Transform  Correlator,"  Applied 
Optics .  28:  1027-1032  (March  1989). 

44.  Casasent,  David  and  Demetri  Psaltis.  "New  Optical 
Transforms  for  Pattern  Recognition,"  Proceedings  of  the 
IEEE,  vol .  65,  77-84  (January  1977). 

45.  Casasent,  David  and  Others.  "Real-Time  Deformation 
Invariant  Optical  Pattern  Recognition  Using  Coordinate 
Transformations,  Applied  Optics,  26:  938-942  (March 
1987)  . 


280 


attended  Cuyahoga  Community  College  until  1977  when  he  received  Associate 
of  Arts,  and  Associate  of  Applied  Business  degrees.  He  graduated  from 
Cleveland  State  University  in  June  1978,  with  a  Bachelors  of  Business 
Administration  degree,  and  was  employed  as  an  accountant  for  the  next  two 
years,  during  which  he  passed  the  Certified  Public  Accountant  examination. 
In  January  1980,  he  served  two  years  in  the  Merchant  Marine.  In  January 
1982  he  returned  to  Cleveland  State  University,  and  graduated  with 'the 
Bachelor  of  Science  in  Electrical  Engineering  in  December  1984.  During 

t 

this  time  he  was  married  to  Terry  Knupp  (September  1982),  and  joined  the 
United  States  Air  Force  (March  1984)  under  the  College  Senior  Engineering 
Program.  Upon  graduation,  he  attended  Officer  Training  School,  and  was 
commissioned  in  April  1985.  He  then  served  as  team  chief  of  a  high 
frequency  communication  team  with  the  1815th  Operational  Test  and 
Evaluation  Squadron,  Wright  Patterson  AFB  OH  until  entering  Air  Force 
Institute  of  Technology. 


UNCLASSIFIED 
SECURITY  CLASSIFICATION  OF  THIS  PACE 


'a  REPORT  SECURITY  CLASSIFICATION 

Unc lass i f ied 


2a-  SECURITY  CLASSIFICATION  AUTHORITY 


2b.  DECLASSIFICATION /DOWNGRADING  SCHEDULE 


4.  PERFORMING  ORGANIZATION  REPORT  NUMBER(S) 

ADIT / OPO/ENG/ 8 9 D - 0  2 


REPORT  DOCUMENTATION  PAGE 


lb  RESTRICTIVE  MARKINGS 


Form  Approved 
OMB  No  0704-0188 


3  DISTRIBUTION /AVAILABILITY  OF  REPORT 

Approved  for  public  release; 
Distribution  uni imi ted 


5.  MONITORING  ORGANIZATION  REPORT  NUMBER'S! 


6a.  NAME  OF  PERFORMING  ORGANIZATION  6b  OFFICE  SYMBOL  7a  NAME  OF  MONITORING  ORGAN'ZAUON 
_  ,  .  (If  applicable) 

School  of  Engineering  A.FTT/ENG 


6c.  ADDRESS  (C/ty,  State,  and  ZIP  Code) 

Air  Force  Institute  of  Technology 
bright-Pat ter son  A.FB  OH  4  5433-6583 


7b  ADDRESS  (City,  State,  ana  ZIP  Code) 


8a.  NAME  OF  FUNDING  /  SPONSORING 
ORGANIZATION 


8b  OFFICE  SYM80L  I  9  PROCUREMENT  INSTRUMENT  IDENTIFICATION  NUMBER 
(If  app'icable)  I 


10  SOURCE  OF  FUNDING  NUMBERS 


PROGRAM 


PROJECT 

TASK 

WORK  UNIT 

NO 

NO 

ACCESSION  NO 

Pome  Air  Development  Cntrj  PADC/CA 


8c  ADDRESS  (City,  State,  and  ZIP  Code) 

Griffis  A.FB,  NY  13441 


1 1  TITLE  (Include  Security  Classification) 

Hybrid  Optical/Digital  Architecture  for  Distortion  !;. variant  Pattern 
Recognition 


12.  PERSONAL  AUTHOR(S) 

John  D.  Cline,  Caotain,  USAF 


13b  TIME  COVERED 
FROM  TO 


13a.  TYPE  OF  REPORT 

US  Thesis 


14.  DATE  OF  REPORT  (Year,  Mor.  b  Day)  15  PAGE  COUNT 

1989  December  291 


COSATI  CODES 


FIELD 


09 


o 


GROUP 


C  5 


SUB-GROUP 


18  SUBJECT  TERMS  { Continue  on  reverse  if  necessary  and  identify  by  block  number) 

Optical  correlators;  Pattern  recognition 


19  ABSTRACT  (Continue  on  reverse  if  necessary  and  identify  by  block  number) 

'Rfesis  Advisor:  Steven  K.  Rogers,  MA  J ,  USA.F 

Associate  Professor  of  Electrical  Fnginoering 

This  research  investigated  optical  techniques  for  pattern  recognition. 

An  optical  joint  transform  correlator  was  implemented  using  a  magneto-optic 
spatial  light  modulator,  a  charged  coupled  device  (crp)  camera  and 
f  ramegrabher  under  personal  computer  (PC)  control.  A  hvhnd  optica  1/d  ig  i  ta  1 
architecture  that  could  potentially  perform  position,  scale,  and  rotation 
invariant  pattern  recognition  using  a  computer  generated  hologram  (CCF)  was 
also  implemented. 

R’he  joint  transform  correlator  was  tested  using  forward  looking  infrared 
(rilD  imagery  containing  tactical  targets,  and  gave  very  good  results.  hew 


20  DISTRIBU. T_::.  AVAILABILITY  Of  ABSTRACT 

E3  UNCLASSIFIED/UNLIMITED  □  SAME  AS  RPT  □  OTIC  USERS 


/ Ca  :i,Mvic  OF  h.E SFO,''T,r1'  -  'V  IuhH'Al 

Fteven  K.  Rogers,  MAJ,  UCAI 


21  ABSTRACT  SECURITY  CLASSIFICATION 

bnclassi i ied 

rZl>.  T E^EPnONt  (Include  Area  Cod°)  22c  Oh-ile  SYMBOL 

(513)  255-9266  AFIT/PNO 


DO  Form  1473,  JUN  86 


Previous  editions  are  obsolete 


SECURITY  CLASSIFICATION  OF  THIS  PAGE 
UNOT,/  CCiriPD 


UNCLASSIFIED 


19  Continued: 

techniques  for  binarizing  the  FLIP  inputs  and  the  fringe  pattern  of  the 
joint  transform  were  discovered.  The  input  binarization  used  both,  the 
scene  average  and  a  localized  energy  normalization  technique  for 
binarization.  This  resulted  in  reduced  scene  background,  while  retaining 
target  detail.  The  fringe  binarization  technique  subtracted  the  Fourier 
transform  of  the  scene  from  the  joint  transform,  and  binarized  on  the 
average  difference.  This  new  technique  was  a  significant  .improvement, 
over  recent  published  designs. 


rNCT./'SSi  n  pi 


